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5^ 1.0 ABSTRACT 

55 

56 THIS PROGRAM TESTS THE KW11-P REAL TIME CLOCK. IT CONTAINS 

57 A SERIES OF INCREMENTAL ROUTINES THAT TEST THE CONTROL AND 

58 STATUS REGISTER, COUNT SET BUFFER, COUNTER, AND INTERRUPT VEC- 
5V TOR ADDRESS USING 100KHZ, 10KHZ, LINE AND 
60 EXTERNAL FREQUENCIES. 
61 

6:- 2.0 REQUIREMENTS 

65 2.1 EQUIPMENT 
64 

65 PDP-11 WITH KW11-P 
66 

67 2.2 STORAGE 
68 

69 THIS PROGRAM OCCUPIES HEMORV FROM 0 TO 11636. 

70 

71 3.0 LOADING PROCEDURE 

72 3.1 METHOD 

73 PROCEDURE FOR NORMAL BINARY TAPES SHOULD BE FOLLOWED 
7<, 1. ABSOLUTE LOADER MUST BE IN MEMORY. 

75 2. PLACE BINARY TAPE IN READER. 

76 3. LOAD ADDRESS •7500 (* DETERMINED BY LOCATION OF LOADER). 
7/ A. PRESS "START" (PROGRAM WILL LOAD). 
78 

79 4.0 STARTING PROCEDURE 

80 4.1 CONTROL SWITCH SETTINGS 
81 

82 SET SW0=1 TO ENABLE TESTS USING EXTERNAL FREQUENCY. 

83 SET SW2=1 TO INCLUDE REPEATABILITY TEST T25 t T26 IF COW IS PRESENT 
84 

85 4.2 STARTING ADDRESSES 
86 

87 200 BASIC TEST 

88 204 RESTART ADDRESS-PRIMARILY USED BY XOR TESTER 

89 210 TIMING TEST 

90 214 DOUBLE OR SINGLE Rr.AL TIME CLOCK TEST. 100KH2. 

91 220 DOUBLE OR SINGLE REAL TIME CLOCK TEST. lOKHZ. 

92 224 DOUBLE OR SINGLE REAL TIME CLOCK TEST. 60HZ. 

93 230 DOUBLE OR SINGLE REAL TIM*" CLOCK TEST SOHZ 
94 

95 4.3 PROGRAM AND^OR OPERATOR ACTION 

96 **NOTE: IF NO HARDWARE SWITCH REGISTER IS AVAILABLE THE PROGRAM WILL 

97 AUTOMATICALLY USE THE CONTENTS OF LOC. 176 AS THE SOFTWARE SWITCH REGISTER. 

98 THE USER SHOULD SET UP THIS LOC. BEFORE STARTjNG THE PROGRAM. 

99 

100 LOAD PROGRAM INTO MEMORY 

101 SET SWITCH REGISTER TO STARTING ADORE. 3 
^02 LOAD ADDRESS. 

103 IF DESIRED TO ENABLE EXTERNAL FREQUENCY fHSTS SET SW0=1. 

104 PRESS START 

105 PROGRAM WILL BEGIN TESTING 
106 
107 

108 5. OPERATING PROCEDURE 
109 
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SEQ 0003 



5.1 OPERATIONAL SWITCH SETTINGS 
5.1.1 BASIC TEST 

WITH SWITCHES 12 THRU 15=0 (DOWN) THE PROGRAM WILL PRINT OUT 
ON ERRORS AND CONTINUE IN TEST. BELL WILL RING AT COMPLETION 
OF A PASS. 

SWITCH SETTINGS ARE: 

SW15=1 OR UP... HALT ON ERROR 

SWH=1 OR UP... SCOPE LOOP 

SW13=1 OR UP. ..INHIBIT PRINTOUT 

SW11=1 OR UP... SINGLE ITERATIONS ONLY 

SW4 =1 OR UP... ENABLE SYNCHRONIZATION TESTS 

SW3 =0 OR DOWN... ADJUSTS DELAYS FOR 11/60, 11/70 OR 11/45 WITH MOS OR 9IP0LAR HE 
SW2 =1 OR UP...CLK2 PRESENT-EXECUTE REPEATABILITY TESTS 

5.2 SUBROUTINE ABSTRACTS 

5.2.1 SCOPE 

THIS SUeftOUTIIIIE CALL IS PLACED BETWEEN EACH SUB-TEST IN THE 
BASIC TEST SECTION. IT RECORDS THE STARTING ADDRESS OF EACH 
SUB-TEST AS IT IS BEING ENTERED. IF A SCOPE LOOP IS REQUESTED, 
IT URL JUMP TO THE START OF THE SUB-TEST INDICATED BY "SCOPE". 

5.2.2 HLT 

THIS SUBROUTINE CALL PRINTS THE ADDRciS THAT TAGS THE FAILING 
SUB-TEST AND THE CONTENTS OF THE CONTROL AND STATUS REGISTER, 
COUNTER. AND "TEHP". 

6. ERRORS 

6.1 ERROR PRINTOUT FORMAT 

WITH SU13=0 (OR DOWN) THE F0LL0UI6 PRINTOUT WILL APPEAR ON 
AN ERROR: 

PC STATUS COUNTER TEhP 
XXXXXX XXXXXX XXXXXX XXXXXX 

PC = ADDRESS OF TEST WHERE ERROR OCCURRED 

STATUS = CONTENTS OF COMMAND AND STATUS REGISTER AT TIME OF ERROR 

COUNTER = CONTENTS OF COUNTER AT TIME OF ERROR 

TEMP = CONTENTS OF ADDRESS "TEMP" USED BY SOME TESTS. 

NOTE: NOT ALL OF THE INFORMATION PRINTED IS INTENDED 

TO BE USEFUL FOR EVERY TYPE OF ERROR. THIS IS SIMPLY 
A STANDARD ERROR REPORT FOR ALL ERRORS. THE OPERATOR 
MUST REFER TO THE PROGRAM LISTING AT THE ADDRESS OR 
THE ERROR FOR A DESCRIPTION OF THE CAUSE OF THE ERROR. 

6.2 ERROR RECOVERY 

WITH SWITCH 15=1 (OR UP) THE PROGRAM WILL HALT ON ANi ERROR. 
DEPRESS "CONTINUE" TO RESUME TESTING. 
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SEC 0004 



7. 
7.1 



8.1 



9. 



9.1 



RESTRICTIONS 

OPERATIONAL RESTRICTIONS 

FOR PURPOSES OF TESTING THE EXTERNAL FREQUENCV SELECTION IT 
IS NECESSARY TO SUPPLY A KNOWN FREQUENCY TO THE EXTERNAL FRE- 
QUENCY INPUT. THIS PROGRAM USES THE INTERNAL 60HZ FOR ITS 
SOURCE. TO DO THIS IT IS REQUIRED THAT A JUMPER WIRE BE CON- 
NECTED BETWEEN PINS CFl AND DAI OF THE SLOT IN WHICH THE CLOCK 
MODULE IS INSERTED. IF THIS IS NOT DONE, THEN THc PROGRAM MUST 
ALWAYS BE RUN WITH SWO=0 TO SUPPRESS THE EXTERNAL TESTS. 
* IF A SECOND P CLOCK IS BEING USED FOR TEST PURPOSES, SET 

THE SWITCH REG = 000004 TO ENABLE TESTS T25 AND T26, DURING 
THE BASE TEST 

MISCELLANEOUS 

EXECUTION TIME 

BASIC TEST REQUIRES 11 SECONDS PER PASS W/O ITERATIONS 66 WITH. 
MMING TEST REQUIRES 4 MINUTES PER PASS. 

DOUBLE OR SINGLE REAL TIME CLOCK TEST-DETERMINED BY OPERATOR 
SUGGESTED EXECUTION TIMES ARE: 

1. IF THE SINGLE CLOCK TEST IS RUN WITHOUT BEING FOLLOWED 

BY THE DUAL CLOCK TEST: 17 MINUTES FOR EACH FREQUENCY (100KHZ,10KHZ,60KH2) 

2. IF THE SINGLE CLOCK TEST IS FOLLOWED BY THE DUAL TEST 
RUN SINGLE CLOCK TEST FOR OKE MINUTE (FOR EACH FREQUENCY) 

RUN DUAL CLOCK TEST FOR FIFTY SECONDS (10 PRINTOUTS) (FOR EACH FREQUENCY) 



NOTE:THIS TIME NOMINAL TIME FOR PDP-11/05 
OTHER C.P.U.'S THE TIME WILL VARY 



PROGRAM DESCRIPTION 

THE PROGRAM CONSISTS OF THREE SECTIONS: THE BASIC TEST THE 

TIMING TEST AND THE REAL TIME CLOCK TEST. THE BASIC TEST CHECKS EACH OF 

THE INDIVIDUAL BITS IN THE CONTROL AND STATUS REGISTER. COUNT SET BUFFER, AND 

COUNTER ALONG WITH PROPER OPERATION UNDER INTERRUPT CONTROL 

(SINGLE OR REPEATED INTERRUPTS) COUNT UP OR COUNT DOWN. AND 

REPEATABILITY. THE TIMING TEST USES ALL CLOCK FREQUENCIES TO 

RING THE TELETYPE BELL AT 10 SECOND INTERVALS. 

THE CLOCK TEST PROVIDES A REAL TIME CLOCK 

WHOSE ACCURARCV CAN BE MEASURED AGAINST AN 

ACCURATE EXTERNAL SOURCE. 



BASIC TEST 
TEST 

TO THRU T9 



DESCRIPTION 

TEST THAT CSR, COUNT SET BUFFER AND COUNTER 
BITS MAY BE SET AND CLEARED. 
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SEQ 0005 



TEST FIX(B1T5) TO SINGLE CLOCK COUNTER. 
TEST CLOCK TO COUNT UP. 
TEST CLOCK TO COUNT DOWN. 
TEST INTERRUPT NODES. 

TEST REPEATABILITY BY CHECKING THAT THE COUNTER 
CONTAINS THE SAHE NUMBER OF COUNTS OVER TWO 
EQUAL PERIODS OF TIME. 



9.2 



TIHING TEST 



9.3 



THIS TEST USES THE REPEATED INTERRUPT MODE TO RING THE TELETYPE 
BELL AT 10 SECOND INTERVALS. FIRST THE BELL IS RUNG A' 10 SE- 
COND INTERVALS FOR 1 MINUTE USING 100HKZ, FOLLOWED BY 1 MINUTE 
AT 10KHZ FOLLOWED BY 1 MINUTE AT LINE FREQ.(60HZ OR 50HZ) AND 
(IF SU0=1) 1 MINUTE AT LINE FREQ. USING EXTERNAL FREQUENCY 
INPUT. 

DOUBLE OR SINGLE REAL TIME CLOCK TEST 



9.3.1 SINGLE CLOCK REAL TIME TEST 
THE 24 HOUR CYCLE: 

THIS TEST TRANSFORMS YOUR COMPUTER INTO AN 
ACCURATE DIGITAL "WALL CLOCK." A NORMAL 
CLOCK'S 12 HOUR CYCLE HAS BEEN REPLACED BY 
A 24 HOUR CYCLE. 

EXAMPLES OF THE 24 HOUR CYCLE FOLLOW: 



ACTUAL TIME 




PRINTOUT 






HRS 


niNS 


SECS 


TENTHS^HUNDRETHS 


MIDNIGHT 


00 


. 00 


00 . 


00 


8:32 AH 


08 


32 


00 . 


00 


12 NOON 


12 


: 00 


00 


00 


2:15 PM 


14 


. 15 


00 . 


00 


11:30 PM 


23 


: 30 


00 . 


00 



9.3.1.1 ENTERING THE TIME 

THE CLOCK CAN BE UPDATED BY HOLDING THE CTRL KEY DOWN 
AND TAPPING THE I KEY. THE CTRL KEY IS THEN RELEASED. 
AND THE STARTING TIME IS ENTERED. 

THE HOST SIGNIFICANT HOUR DIGIT is ENTERED FIRST. 
THIS DIGIT HUST BE A ZERO, A ONE OR A TWO. 

THE LEAST SIGNIFICANT HOURS DIGIT IS ENTERED NEXT FOLLOWED BY 
THE TWO MINUTES DIGIT, FOLLOWED BY THE TWO SECONDS DIGIT. 
THE FRACTION OF A SECOND DIGITS ARE NOT ENTERED. THE 
USER WILL ENTER A TOTAL OF SIX DIGITS WITH NO SPACES. COLONS. 
OR ANY OTHER CHARACTERS BETWEEN DIGITS. THE USER MUST 
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ENTER A TIME THAT WILL OCCUR A HALF MINUTE OR MORE 
IN THE FUTURE, TO ALLOW ENOUGH TIME TO ENTER THE REQUIRED 
INFORMATION. AFTER THE INFORMATION HAS BEEN ENTERED, THE 
USER MONITORS THE TIME STANDARD. WHEN THAT STANDARD REACHES 
THE TIME ENTERED VIA THE KEYBOARD, THE USER HITS THE 
CARRAGE RETURN (CR) KEY TO START THE CLOCK. 
NOTE THAT THE CHARACTERS WILL NOT BE PRINTED 
OUT AS THE TINE IS BEING ENTERED. 

9.3.1.2 READING THE TIME 

TO PRINT THE TIME. DEPRESS THE CTRL KEY. WHILE HOLDING 
THE CTRL KEY DOWN, SMARTLY TAP THE T KEY. THE TIME WHICH 
CORRESPONDS TO THE INSTANT THAT THE T KEY WAS DOWN, WILL 
BE PRINTED OUT. THE FORMAT OF THE PRINTOUT WILL BE SIHULAR 
TO THAT SHOWN IN THE 2A HOUR TIME EXAMPLE. THE 
ONLY DIFFERENCE WILL BE THE ABSENCE OF SPACES. 

9.3.1.3 TIME REFERENCES 

SINCE THE SYSTEM CLOCK IS MORE ACCURATE THAN MANY WRIST 

WATCHES, IT IS A GOOD IDEA TO USE AN ACCURATE TINE STANDARD. 

MANY TELEPHONE CONPANIES PROVIDE A NUNBER WHERE 

THE TINE, SYNCHRONIZED TO THE NATIONAL BUREAU OF STANDARDS 

RADIO STATION (WUV), IS AVAILABLE. CONSULT WITH YOUR LOCAL 

TELEPHONE COMPANY TO SEE IF THIS SERVICE IS AVAILABLE IN YOUR AREA. 

9.3.1.4 PROCEDURE FOR SINGLE CLOCK REAL TINE TEST. 

1. PERFORN THE BASIC TEST, PRIOR TO THE PERFORMANCE OF 
THIS TEST. PROCEED ONLY IF THE BASIC TEST HAS PASSED. 

2. LOAD ADDRESS 2U VIA THE SWITCH REGISTER. (100KHZ TEST) 

3. PLACE ALL ZEROS IN SWITCH REG., DEPRESS START 

<>. EXANINE YOUR TINE REFERENCE. AND SELECT A TINE THAT 
WILL ALLOU YOU ENOUGH TINE TO ENTER THE TINE VIA THE 
KEYBOARD. 

5. Ek'TER TKc tine, as DESCRIBED PREVIOUSLY. 

6. START THE CLOCK (HIT THE CR KEY) AT THE INSTANT THE 
TINE REFERENCE CORRELATES WITH THE TINE ENTERED. 

7. NONITOR YOUR TINE REFERENCE, EXACTLY 1 MINUTE 

FRON THE TIME YOU STARTED THE CLOCK. READ THE PROGRAM 
CLOCK AS DESCRIBED PREVIOUSLY. 

8. THE ONE MINUTE TINE ERROR SHOULD BE WITHIN ONE SECOND 
OF THE ACTUAL TINE. 

9. IF THE RESULT OF STEP 8 IS NOT WITHIN ONE SECOND, 
ALLOW EXACTLY ONE NORE MINUTE TO PASS (FROM THE ORIGINAL 
START TINE). READ THE TINE AGAIN. IF THE TOTAL ERROR 
DOUBLED. THE BOARD IS DEFECTIVE. IF THE ERROR IS CONSTANT, 



CZKUBJO KU11- 
CZKUBJ.P11 

33A 
355 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
557 
358 
559 
360 
561 
362 
363 
364 
365 
366 
567 
368 
369 
370 
571 
572 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
386 
387 
388 
389 



P RT CLK TST 
19-APR-78 09:55 



HACYII 30A(1052) 



H 1 

19-APR-78 09:58 PAGE 7 



SEO 0007 



RESTART THE TEST. 

10. * IF THE ONE HINUTE TEST WAS PASSED, ALLOW THE TEST TO 

RUN FOR EXACTLY 16 MINUTES MORE. AT THE EXACT END OF THE 

16TH HINUTE INTERVAL. READ THE CLOCK. IT SHOULD 

BE WITHIN THREE SECONDS OF THE CORRECT TIME. IF IT IS NOT, 

THE BOARD IS DEFECTIVE. IN THE EVENT THAT THE DUAL CLOCK 

REAL TIME TEST IS GOING TO BE PERFORMED, THIS STEP 

CAN BE OMITTED. 

11. LOAD ADDRESS 220 VIA SWITCH REGISTER, 
DEPRESS START (10KHZ TEST) 

REPEAT STEPS 3-10 

12. LOAD ADDRESS 224 VIA SWITCH REGISTER, 

DEPRESS START (224 IF 60HZ, OR 250 IF 50HZ LINE TEST) 
REPEAT STEPS 3-10 

• THE DURATION OF THIS TEST IS ARBITRARY, IT IS NOMINALLY 
A THOUSAND SECOND TEST. LONGER TESTS ARE PERMISSIBLE. 
THE RESULTS OF LONG TERM TESTS SHOULD BE WITHIN (PLUS OR MINUS) 
1 MINUTE FOR A 24 HR TEST. 

NOTE THAT THE TIME CAN BE READ AT ANY POINT WITHIN 
THE TEST WITHOUT AFFECTING THE TEST. 

9.3.2 DUAL CLOCK REAL TIME CLOCK TEST 

THE USE OF A TEMPORARY CLOCK (REFERED AS COW) REDUCES THE TIME 
REQUIRED FOR THE REAL TIME TEST. THE SECOND CLOCK INTERRUPTS 
THE FIRST CLOCK EVERY FIVE SECONDS. THE DURATION OF THE COMBINED 
REAL TIMES TESTS. WHEN THE DUAL CLOCK TEST IS USED IS 
1 MIN : 50 SEC/FREQ VERSUS 17 MIN/FREQ FOR THE 
SINGLE CLOCK REAL TIME TEST ALONE. 

THE DUAL CLOCK TEST REQUIRES THAT THE CLOCK BE STARTED AS IN 
THE SINGLE MODE. RAISING SWITCH4r2 CAUSES THE PRINTOUT 
TO OCCUR AUTOMATICALLY. 

THF COW MODULE SHOULD ONLY BE INSTALLED IN THE SYSTEM WHILE 
THIS DIAGNOSTIC IS BEING USED. 



TO CONVERT A STANDARD P CLOCK TO A "COW" MODULE: 

1. REMOVE JUMPER A4 
CSR=772560 
CSB=772562 
CTR=772564 

2. ADD JUMPER V8 

VECTOR LOCATION IS 504 
PSW " " 506 
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390 NOTE: THIS VECTOR IS IN FLOATING VECTOR SPACE .CAUTION IS ADVICED 

391 WITH RESPECT TO ALLOWING VECTOR CONFLICTS. 
392 
393 

39A 9.3.2.1 PROCEDURE FOR DUAL CLOCK REAL TIME CLOCK TEST 

395 

396 1. LOAD ADDRESS 2U. DEPRESS START (100KHZ TEST) 
397 

398 2. ENTER THE TIME VIA THE TTY KEYBOARD AS DESCRIBED PREVIOUSLY 
399 

AGO 3. SET THE SWITCHES IN THE SWITCH REGISTER TO 000004, 
401 THE TTY WILL PRINT THE TIME AT 5 SECOND INTERVALS 

402 

403 4. CONSECUTIVE PRINTOUTS WILL BE WITHIN 5.00 PLUS OR 

404 MINUS .01 SECONDS OF EACH OTHER. ALLOW THE TEST TO 

405 RUN FOR AT LEAST TEN PRINTOUTS. If THE TOLERANCE IS 

406 EXCEEDED. THE CLOCK IS DEFECTIVE. 

407 

408 5. LOAD ADDRESS 220, DEPRESS START (10KHZ TEST) 
409 

410 6. REPEAT STEPS 2-4 

411 

41? 7. LOAD ADDRESS 224, IF 60HZ. OR 230 IF 50HZ DEPRESS START (LINE TEST) 
413 

414 8. REPEAT STEPS 2 » 3 

415 

416 9. CONSECUTIVE PRINTOUTS WILL BE WITHIN 5.00 PLUS OP. 

417 MINUS .04 SECONDS Of EACH OTHER. TYPICALLY, AND 

418 5.00 PLUS OR RINUS .2 SECONDS WORST CASE, DUE 

419 TO POSSIBLE AC LINE FREQUENCY VARIATIONS. ALLOW THE 

420 TEST TO RUN FOR AT LEAST TEN PRINTOUTS. IF THE TOLERANCE 

421 IS EXCEEDED. THE CLOCK IS DEFECTIVE. 
422 

423 10. THIS KU11>P DIAGNOSTIC WILL 60 OUT ( FIND IF THIS SHOULD 

424 RUN WITH CPU THAT HAS A SWITCH REG. OR WILL RUN WITH A PDP-11/04 

425 THAT HAS NO SWITCH REGISTER. IP CPU HAS NO SWITCH REG. 

426 LOCATION 176 EQUALS SOFTWARE SWITCH REGISTER. IN THE ABOVE TEST 

427 TYPING G(C0NTR0L-6) WILL ALLOW YOU TO ENTER/ALTER THE SOFTWARE SWITCH SETTINGS 

428 .ENDR 
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START BASIC TEST 
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-RESTART BASIC TEST 
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START TIMING TEST 
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-DOUBLE OR SIN6AL CLK TEST. 
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;DOUBLE OR SINGLE CLK TEST. 
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-DOUBLE OR SINGLE CLK TEST. 
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-DOUBLE OR SINGLE CLK TEST. 
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.-COUNT SET BUFFER 
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0 








468 


001020 


000000 




TEHP 




0 








469 


001022 


000001 




I COUNT 


: 1 








470 


001 02A 


177740 




DELI 




-40 








471 


001026 


177730 




DEL2 




-SO 








472 


001030 


160000 




DEL3 




-20000 








473 


001032 


160000 




0EL4 




-20000 








474 


001034 


177700 




ADJ: 




-100 




-DELAY ADJUSTMENT FOR 11/70 




475 
















• t 11/45 WITH MOS MEM. 




476 


001036 


177660 








-120 








477 


001040 


140000 








-40000 








478 


001 042 


1 40000 








-40000 








479 


001044 


177570 




SR: 




177570 








480 




















481 




















482 




















483 




















484 


001046 


012706 


000776 


BEGIN2 


: nOV irBUFF,X6 









SEQ 0009 



C2ICUBJ0 


KUl 1 -P 


RT CIK TST 


MAC Y1 1 


30A(1052) 19- 


K 

APR-78 09:58 


CZKUBJ. 


P11 


1 Q-APR-7R 


09- SS 






BASIC 


TEST 


485 


001052 


\IC J f Jt 


U wwv*v C 


000046 




FMP 


a#42. a#46 


486 


001060 










BEQ 

W L V 


1$ 


487 


001062 




006436 






MOV 


#NSG3, X2 


488 


001066 


004737 


006266 

WwC Uw 






JSR 


%7 . TOP 


489 


001072 


004 737 


01 165? 




1t- 


JSR 


X7.SUADJ 


490 


001076 


004737 


011610 

W 1 1 W 1 V 






JSR 


X7,DELADJ 


491 


001102 


01 5746 


000004 

w w w w V** 








a#4.-(X6) 


492 


001106 


012737 


001230 


000004 




liov 


#X0R,8#4 


493 


001114 


005737 


177060 






TST 


8#1 77060 


494 


001120 


012637 


000004 






MOV 


(X6)«^.a#4 


495 


001124 


012737 


177777 


006252 




NOV 


#-1 .afXORFLG 


496 


001132 


012737 


000001 

WWW 1 


001022 




nov 


#1 .ailCOUNT 


497 


001 140 


01270? 

VIC' wc 


006540 

V W w J ~ \J 






liOV 


#X0RN.X2 


498 


001144 


004737 


006266 

V WwL W 






JSR 


X7.T0P 


499 
500 


001150 


012706 


000776 

www 1 f w 




BEGIN 


MOV 


#BUFF,X6 


501 


001 1 54 


004737 


011652 






JSR 


X7.SUA0J 


502 


001160 


004737 


011610 






JSR 


X7,0ELA0J 


503 


001164 


012737 


005572 


000024 




NOV 


fPyRFl ,24 


504 


001172 


005077 


005442 






CLR 


apsu 


505 


001176 


005037 


001020 

WW 1 w c w 






CLR 


TENP 


506 


001202 


005037 


006250 






CLR 


SCOPEF 


507 


001206 


005037 


001016 






CLR 


TENPl 


508 


001212 


012737 


001254 


006264 




NOV 


f TO, RE TURN 


509 


001220 


005037 


005764 






CLR 


PRINTI 


510 


001224 


000137 


001254 






JHP 


TO 


511 
512 


001 230 


022626 






XOR: 


CNP 


(I6)*.(I6>* 


513 


001232 


012637 


000004 






NOV 


(X6)^,a#A 


514 


001236 


012737 


000005 


001022 




NOV 


#5,a#IC0UNT 


515 


001244 


005037 


006252 






CLR 


afXORFLG 


516 


001250 


000137 


001150 






JNP 


atBEGIN 


517 










;TEST 


INIT TO 


CLEAR CONTROL 


518 
519 


001254 


013746 


000004 

w w w w w~ 




TO: 


NOV 


a#4,-(X6) 


520 


001260 


012737 


001312 


000004 




NOV 


fCSRT,a#4 


521 


001266 


012777 


100377 


177504 




NOV 


#100377, aCSR 


522 


001274 


000005 

W W V w w ^ 








RESET 


523 


001276 


032777 


100377 


177474 




BIT 


#100377,aCSR 


524 


001304 


001413 








BEQ 


Tl 


525 


001 306 


104000 








HLT 




526 


001310 


000411 








BR 


Tl 


527 


001312 


022626 






CSRT: 


CNP 


(X6}*,(X6)* 


528 


001 3U 


012637 


000004 






NOV 


(X6>«^,a#4 


529 


001 320 


032777 


040000 


177516 




BIT 


#4 0000, as R 


530 


001326 


001352 








BNE 


TO 


531 


001330 


000000 








HALT 




532 


001332 


000750 

WWW' ^ w 








BR 


TO 


533 










•TEST 


COUNT SET BUFFER 


534 


001334 


012637 


000004 

W WW w w • 




Tl : 


NOV 


(X6}«-,a#4 


535 


001340 


104400 








SCOPE 




536 


001342 


012777 




177432 




NOV 


#-i,acsB 


537 


001350 


005777 


^77^26 






TST 


acsB 


538 


001354 


001401 








BEQ 


.♦4 




0U1 jjO 


104000 








HLT 




540 


001360 


012737 


\77777 


001020 




NOV 


#-l,a#TEHP 



10 



SEQ 0010 



.•UNDER ACT ? 

.•YES-SKIP TITLE PRINT OUT 
.•PRINT TITLE 

.-HAS THIS CPU HAVE A SWITCH REG.? 
.•IS ADJUSTNENT IN DELAY REQUIRED 



;SET UP STACK FOR SCOPE LOOPS 
;HAS THIS CPU HAVE A SVITCH REG.? 
:IS ADJUSTNENT IN DELAY REQUIRED 
;INIT POWER FAIL POINTER 
.•CLEAR PROC. STATUS REG. 

;INIT. SCOPEF TAG 

;SET UP RESTART OF PROGRAM 
.-INITIALIZE ERROR PRINTOUT READING 



STATUS REGISTER 



;ERROR. INIT FAILED TO CLEAR ALL BITS OF CSR. 



:N0 SSYN FRON DEVICE 



;ERR, FAILED TO GIVE ZERO'S FRON WRITE ONLY REG. 





KU1 1 -P 


RT CLK TST 


MACYll 


CZKUBJ. 


P11 


in Ann 7Q 


AO • < C 




5A1 


001 366 


M J777 


AAAAAA 

OOuOOO 


177410 


5A2 


001374 


\jdil I 1 


AA1 AOA 

UOl OcO 


177402 


5A3 


001402 


AA1 / A1 
001 <l01 






544 


C01404 


1 A/ AAA 

704000 






545 










546 










547 


001406 


AftC AZ7 


AAI 030 
UU 1 UcU 




548 


001412 


1 A/ / AA 

1 OssOO 






549 


001414 


A1 T777 


001 030 
UU 1 UcU 


177360 


550 


001422 


\)CJf ( I 


nOI 030 
UU 1 UcU 


177354 


551 


001430 


Aft1 AAI 

UU1 '•01 






552 


001432 


1 1\/ AAA 






553 


001434 


AAf3T7 

003c3# 


A01 A30 

OOlOcO 




554 


001440 


AA1 TiLC 

001 505 






555 










556 


001442 


1 l\LL(\f\ 






557 


001444 


0050f 1 


1 77770 

1 f 1 3 jU 




558 


001450 


A1 0777 


1 77777 

\ f f 1 1 1 


177324 


559 


001456 


M X7X7 


001 OTO 
UU 1 U3U 


001020 


560 


001464 




001 030 
UU 1 UcU 




561 


001470 


nni X7K 






562 


001472 


ft55777 
VCC Iff 


1 77777 

\ f f f 1 f 


177304 


563 


001 500 


AA1 Z rtl 
001«»U1 






564 


001502 


1 OhUUU 






565 










566 


001504 








567 


001506 




1 773AA 
1 r 1 cOO 




568 


001512 


A1 3777 


1 77777 
\ f 1 1 f 1 


177262 


569 


001 520 


ni '?7T7 
U 1 Jf jr 


001 O'^O 
UU 1 U Jw 


001020 


570 










571 


001526 


Ai ?777 


1 777XA 

\ 1 1 1 JO 


1 77244 


572 


001534 


ni 77 Art 

Mill UU 


1 773^0 
1 f f cHU 




573 


00' 340 


M 3777 

Vlcf ' 1 


OOOOOO 


177232 


574 


001546 


HI 77no 

\J 1 f 1 UU 


17733A 
1 r r ccO 




575 


001552 


UUJC J' 


001030 
UU 1 UCv 




576 


001556 


nni TAX 

UU 1 jO J 






577 


001 560 


n33777 
\Jccf f 1 


1 mn 

\ f 1 f f f 


177216 


578 


001566 


UU 1 hU I 






579 


001570 


1 Uh uuu 






580 










581 


001572 


\ UhhUU 






582 


001574 


ni 3777 

V I CI r 1 


177777 

\ 1 1 1 1 1 


177200 


583 


001602 








584 


001604 


UU3 III 


1 771 7A 




585 


001610 


UU 1 ••U 1 






586 


001612 


1 OAono 

1 VivW 






587 










588 


001614 


1 UHHUU 






589 


001616 


013777 

Vlcf f 1 


000003 
UUUUwC 


177154 


590 


001624 


033777 
K/ccf f 1 


000003 


177146 


591 


001632 


f\t\^Lf\^ 

UU 1 '•U 1 






592 


001634 


104000 






593 


001636 


012777 


000004 


177134 


594 


001644 


()22m 


000004 


177126 




QUI 03^ 


001401 






596 


001654 


104000 







> 19-APR-78 
BASIC TEST 



L 1 
09:58 PAGE 



11 



SEQ 0011 



.•TEST 
.-TEST 



T3: 



SET 



.-TEST 
T3A: 



1$: 



.•TEST 
T3B: 



nov 

CHP 

BEQ 

HLT 
COUNT 
COUNTER 

CLR 

SCOPE 

NOV 

CHP 

BEQ 

HLT 

INC 

BNE 
THAT CTR 

SCOPE 

CLR 

MOV 

HOV 

INC 

BNE 

CHP 

BEQ 

HLT 
THAT CTR 

SCOPE 

CLR 

HOV 

NOV 



fO.aCTR 
a/TTENP.aCTR 
.♦4 

;CTR CHANGED WHEN WRITTEN TO 
BUFFER TO ACCEPT A COUNT PATTERN 
TO CONTAIN COUNT SET BUFFER VALUE 
TEHP 



TEHP.aCSB 
TEHP.aCTR 
.♦4 

.■ERROR. CTR NOT=TEHP 
TEHP .•♦1 TO COUNT PATTERN 

T3 .REPEAT UNTIL COUNT OVERFLOWS 

REHAINS CONSTANT IF RUN CLEAR 



aCSR 

#-i.acsB 

a#DEL3.aiT£HP 

afTEHP 

IS 

#-1,aCTR 
.+4 

REMAINS CONSTANT 

acsR 

#-1,8CSB 
8#0EL3.a#TEHP 



:CTR CHANGED ALTHOUGH RUN 0 
WHEN CSR IS REF'D 



IS 



#177736.8CSR 
aCSR.ZO 

fO,acsR 
acsR.xo 

a#TEHP 
IS 

#-1,aCTR 
.♦4 

;CTR CHANGED BY CSR REF 
.-TEST INIT TO CLEAR COUNT SET BUFFER WHEN IT IS =-1 
T4: SCOPE 

NOV #-1 .acsB 

RESET 

TST aCTR 
BEQ .+4 

HLT .-ERROR. INIT FAILED TO CLEAR CSB 

.-TEST RATE SELECT (BIT. 2) NAY BE SET AND CLEARED 



HOV 
NOV 
NOV 
NOV 
INC 
BNE 
CHP 
BEQ 
HLT 



T5: 



SCOPE 
HOV 
CHP 
BEQ 
HLT 
HOV 
CHP 
BEQ 
HLT 



#2,8CSR 

#2.acsR 

.♦4 

#4,aCSR 
l4,aCSR 
.♦4 



.-ERROR. CSR NOT = 2 



.-ERROR, CSR NOT = 4 



CZKUBJO 


Kun-p 


RT CLK TST 


HACY11 


CZKWBJ . 


P11 


I9-APR-78 


09:55 




597 


001656 


012777 


000006 


177114 


598 


001664 


022777 


000006 


177106 


599 


001672 


001401 






600 


001674 


104000 






601 


001676 


005077 


1 77076 




602 


001702 


005777 


177072 




603 


001706 


001401 






604 


001710 


104000 






605 










606 


001712 


104400 






607 


001714 


012777 


000010 


177056 


608 


001722 


022777 


000010 


177050 


609 


001 730 


001401 






610 


001732 


104000 






611 


001734 


005077 


177040 




612 


001740 


005777 


177034 




613 


001744 


001401 






6U 


001746 


104000 






615 










616 


001750 


104400 






617 


001752 


012777 


000020 


177020 


618 


001760 


022777 


000020 


177012 


619 


001766 


001401 






620 


001770 


104000 






621 


001 772 


005077 


177002 




622 


001776 


005777 


176776 




625 


002002 


001401 






624 


002004 


104000 






625 










626 










627 










628 


002006 


104400 






629 


002010 


012737 


000340 


177776 


630 


002016 


012777 


000100 


176754 


631 


002024 


022777 


0001 00 


176740 


632 


002032 


001401 






633 


002034 


1 04000 






634 


002036 


005077 


176736 




635 


002042 


005777 


176732 




636 


002046 


001401 






637 


002050 


104000 






638 










639 










640 


002052 


104400 






641 


002054 


005077 


176720 




642 


002060 


005037 


001020 




643 


002064 


013777 


001020 


176710 


644 


002072 


012777 


000021 


176700 


645 


002100 


032777 


000001 


176672 


646 


002106 


001001 






647 


002110 


104000 






648 


002112 








649 


002114 


005077 


176660 




650 


002120 


005037 


001020 




651 


002124 


013777 


001020 


176650 


652 


002132 




000020 


176640 



> 19-APR-78 
BASIC TEST 



n 

09:58 



1 

PAGE 12 



SEQ 0012 



nov 

CHP 
BEO 
HLT 
CLR 
TST 
BEQ 
HLT 



#6,aCSR 
«6,aCSR 
.♦4 

acsR 
acsR 

.♦4 



.-ERROR, CSR NOT = 6 



.-TEST MODE (BIT 3) CAN BE SET AND CLEARED 



;ERR0R, CSR NOT = 0 



T6: 



SCOPE 
MOV 
CHP 
BEO 
HLT 
CLR 
TST 
BEQ 
HLT 



#10,aCSR 

#io,acsR 

.♦4 

acsR 
acsR 

.♦4 



; ERROR, CSR NOT = 10 



.-TEST UP/ON (BIT 4) CAN BE SET AND CLEARED 



.ERROR, CSR NOT 



T7: 



SCOPE 
MOV 
CMP 
BEQ 
HLT 
CLR 
TST 
BEQ 
HLT 



#20,aCSR 
#20,aCSR 
.♦4 

acsR 
acsR 

.♦4 



.-ERROR. CSR NOT = 20 



.-ERROR, CSR NOT = 0 



.-TEST INTERRUPT ENABLE (BIT 6) CAN BE SET AND CLEARED 



19: 



SCOPE 
NOV 
MOV 
CUP 
BEQ 
HLT 
CLR 
TST 
BEQ 
HLT 



f340,CC 
flOO.aCSR 

fioo,acsR 

acsR 
acsR 

.♦4 



.-SET PROCESSOR PRIORITY LEVEL 7 



.-ERROR, CSR NOT = 100 



.-TEST RUN (BIT 0) CAN BE SET AND CLEARED 
T9A: 



.-ERROR. CSR NOT = 0 



SCOPE 
CLR 
CLR 
MOV 

nov 

BIT 
BNE 

HLT 

SCOPE 

CLR 

CLR 

MOV 

nov 



acsR 

TEMP 

TEMP.aCSB 

#2i,acsR 
fi.acsR 

.♦4 



acsR 

TEMP 

TEMP.aCSB 
«20,aCSR 



.•START AT ZERO 

.-DISABLE INTERRUPT, COUNT UP. SET RUN 
;CHECK IF ZERO IS STILL SET 

;CSR LOST BIT 0 AFTER BIT INSTRUCTION 



.-START AT ZERO 

.-DISABLE INTERRUPT, COUNT UP, DO NOT SET RUN 



CZKUBJO 


KUll-P 


RT CLK TST 


HACYI 1 


C2KUBJ . 


P11 


I9-APR-78 


09:55 




653 


002UO 


052777 


000001 


176632 


65A 


002U6 


032777 


000001 


176624 


655 


0021 5A 


001001 






656 


0021 56 


104000 






657 


002160 


104400 






658 


002162 


005077 


176612 




659 


002166 


005037 


001020 




660 


002172 


013777 


001020 


176602 


661 


002200 


012777 


000021 


176572 


662 


002206 


012777 


000020 


176564 


663 


0022U 


032777 


000001 


176536 


66A 


002222 


001401 






665 


002224 


104000 






666 










667 










668 










669 










670 


002226 


104400 






671 


002230 


005077 


176544 




672 


002234 


012777 


177777 


176540 


673 


002242 


012737 


177776 


001020 


674 


002250 


012777 


000040 


176522 


675 


002256 


023777 


001020 


176520 


676 


002264 


001401 






677 


002266 


104000 






678 


002270 


005337 


001020 




6/9 


002274 


023727 


001020 


000000 


680 


002302 


001362 






681 










682 










683 


002304 


104400 






68A 


002306 


005077 


176466 




685 


002312 


005077 


176464 




686 


002316 


012737 


000001 


001020 


687 


002324 


012777 


000060 


176446 


688 


002332 


023777 


001020 


176444 


689 


002340 


001401 






690 


002342 


104000 






691 


002344 


005237 


001020 




692 


002350 


023727 


001020 


000000 


693 


002356 


001362 






69A 










695 










696 


002360 


104400 






697 


002362 


005077 


176412 




698 


002366 


012777 


000002 


176406 


699 


002374 


012777 


00000'' 


176376 


700 


002402 


013737 


001024 


001020 


701 


002410 


105777 


1 76364 




702 


002414 


100410 






703 


002416 


062737 


000001 


001020 


70A 


002424 


001371 






705 


002426 


042777 


000001 


176344 


706 


002434 


104000 






707 


002436 


005777 


176342 




708 


002442 


001401 







30A(1052) 





N 1 




19- 


APR-78 09:58 PAGE 15 




BASIC 


TEST 




BIS 


#1,SCSR 


SET RUN 


BIT 


#1.8CSR .-CHECK IF BIT 0 IS SET 


BNE 


.♦4 




HLT 


:CSR LOST BIT 0 AFTER A BIS INSTRUCTION 


SCOPE 






CLR 


acsR 




CLR 


TE«P 




nov 


TEHP.aCSB 


START AT ZERO 


nov 


#21,aCSR 


DISABLE INTERRUPT, COUNT UP, SET RUN 


nov 


#20,aCSR 


•LEAVE ALL SAME RESET RUN 


BIT 


#i,acsR 


'CHECK BIT 0 


BEQ 


.♦4 


■BRANCH IF NOT SET 


HLT 




■CSR PICKED BIT 0 ON A MOV. 



SEQ 0013 



TEST FIX (BIT 
SET UP/DN (BI 



5) TO SINGLE CLOCK COUNTER 
T 4) =0 TO ENABLE COUNT DOWN 

acsR 

#-i.acsB 

#-2. TEMP 
«40.aCSft 
TEMP.aCTR 
.♦4 



TEMP 
TEMP,#0 

T10A 

5) TO SINGLE CLOCK COUNTER 
4)s1 TO ENABLE COUNT UP 



T10: SCOPE 
CLR 
MOV 
MOV 

T10A: MOV 
CMP 
BEQ 
HLT 
DEC 
CMP 
BNE 

.•TEST fix (BIT 
.SET UP/ON (BIT 
T11: SCOPE 

CLR acsR 
CLR acsB 

MOV #1.TEMP 

T11A: MOV #60,aCSR 

CMP TEMP,aCTR 

BEQ .^4 

HLT 

INC TEMP 

CMP TEMP. to 

BNE T11A 
.•TEST CLOCK TO COUNT DOWN AT ALL FREQUENCIES 
:100KHZ 



ERROR. COUNTER NOT = TEMP. DIDN'T COUNT DOWN 
-1 TO PATTERN COUNT 
DONE ALL COUNTS? 
NO 



.ERROR. COUNTER NOT = TEMP. FAILED TO COUNT UP. 
.•♦1 TO PATTERN COUNT 
;DONE ALL COUNTS ? 
:N0 



T12: 



T12A: 



T12B: 



SCOPE 

CLR 

MOV 

MOV 

MOV 

TSTB 

BMI 

ADD 

BNE 

BIC 

HLT 

TST 

BEQ 



acsR 

f2,aCSB 

fi.acsR 

amLi.afTEMp 

acsR 

T12B 

#1,a#TEMP 

T12A 

#i.acsR 
acTR 

.♦4 



.•COUNT SET BUFFER TO 2 

:DOUN COUNT , 100KHZ. GO 



.•ERROR. P INTR (BIT 7) NOT = 1 



B 2 

CZKWBJO KUII-P RT CLK TST HACYll 30A(1052) 19-APR-78 09:58 P 



CZKWBJ. 


P11 


19-APR-78 


09:55 






BASIC 


TEST 


709 


002444 


104000 








HLT 




710 
















711 










;10KHZ 






712 


002446 


104400 






T13: 


SCOPE 




713 


002450 


005077 


176324 






CLR 


aCSR 


7H 


002454 


012777 


000002 


176320 




NOV 


#2.aCSB 


715 


002462 


012777 


000003 


176310 




HOV 


«3,aCSR 


716 


002470 


013737 


001026 


001020 




MOV 


a«DEL2,8«TEMP 


717 


002476 


105777 


176276 




T13A: 


TSTB 


acsR 


718 


002502 


100410 








BMI 


T13B 


719 


002504 


062737 


000001 


001020 




ADD 


ii,a#TEnp 


720 


002512 


001371 








BNE 


T13A 


721 


002514 


042777 


000001 


176256 




BIC 


«i,acsR 


722 


002522 


104000 








HLT 




723 


002524 


005777 


176254 




T13B: 


TST 


aCTR 


724 


002530 


001401 








BEQ 


.♦4 


725 


002532 


104000 








HLT 




726 










.•LINE 


FREQ. 




727 


002534 


104400 






T14: 


SCOPE 




728 


002536 


005737 


006252 






TST 


afXORFLG 


729 


002542 


100432 








BR I 


T15 


730 


002544 


005077 


176230 






CLR 


acsR 


731 


002550 


012777 


000002 


176224 




HOV 


#2.aCSB 


732 


002556 


012777 


000005 


176214 




MOV 


«5,aCSR 


733 


002564 


013737 


001030 


001020 




nov 


a#DEL3,a«TEnp 


73A 


002572 


105777 


1 76202 




T14A: 


TSTB 


acsR 


735 


002576 


100410 








BHI 


TUB 


736 


002600 


062737 


000001 


001020 




ADD 


#1,afTENP 


737 


002606 


001371 








BNE 


TUA 


738 


002610 


042777 


000001 


176162 




BIC 


#i«acsR 


739 


002616 


104000 








HLT 




7A0 


002620 


005777 


176160 




TUB: 


TST 


acTR 


7A1 


002624 


001401 








BEQ 


.*4 


742 


002626 


104000 








HLT 




7A3 










;EXT FREQ 




744 


002630 


104400 






115: 


SCOPE 




745 


002632 


032777 


000001 


176204 




BIT 


#l.asR 


746 


002640 


001432 








BEQ 


T16 


747 


002642 


005077 


176132 






CLR 


acsR 


748 


002646 


012777 


000002 


176126 




HOV 


«2,aCSB 


749 


002654 


012777 


000007 


176116 




nov 


#7,aCSR 


750 


002662 


013737 


001032 


001020 




HOV 


afDEL4.aiTENP 


751 


002670 


105777 


176104 




T15A: 


TSTB 


acsR 


752 


002674 


100410 








BHI 


T158 


753 


002676 


062737 


000001 


001020 




ADD 


#i,a#TEm> 


754 


002704 


001371 








BNE 


T15A 


755 


002706 


042777 


000001 


176064 




BIC 


#i,acsR 


756 


002714 


104000 








HLT 




757 


002716 


005777 


1 76062 




T15B: 


TST 


8CTR 


758 


002722 


001401 








BEQ 


.*4 


759 


002724 


104000 








HLT 




760 
















761 










.•TEST 


CLOCK TO 


COUNT UP AT ALL 


762 










:100 KHZ 




763 


002726 


104400 






T16: 


SCOPE 




764 


002730 


005077 


1 76044 






CLR 


acsR 



14 



SEQ 0014 

;ERROR. COUNTER DID NOT COUNT DOWN TO 0 



;D0WN COUNT, IOKHZ, GO 

;ERR0R, P INTR (BIT 7) NOT = 1 . 
:ERR0R, COUNTER DID NOT COUNTDOWN TO 0 

;OOUN COUNT. LINE FREQ., GO 

.ERROR, P INTR (BIT 7) N0T=1 

;ERROR. COUNTER DID NOT COUNT DOWN TO 0 

• 

.-DOWN COUNT, EXT., GO 

.ERROR. P INTR (BIT 7) N0T=1 

.ERROR, COUNTER DID NOT COUNT DOWN TO 0 
FREQUENCIES 
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09:55 






BASK 


TEST 


765 


002734 


012777 


177776 


176040 




nov 


#-2,acsB 


766 


002742 


012777 


000021 


176030 




nov 


#21 ,9CSR 


767 


002750 


013737 


001024 


001020 




nov 


a#DELl .aiTEHP 


768 


002756 


105777 


176016 




T16A: 


1S1B 


iCSR 


769 


002762 


100410 








BMI 


T16B 


770 


002764 


062737 


000001 


001020 




ADD 


#1 ,8#TEnP 


771 


002772 


001371 








BNE 


T16A 


772 


002774 


042777 


000001 


175776 




BIC 


#1 ,acsR 


773 


003002 


104000 








HLT 




77A 


003004 


005777 


175774 




T:6B: 


TST 


acTR 


775 


003010 


001401 








BEQ 


.♦4 


776 


003012 


104000 








HLT 




777 










;10 KHZ 




778 


003014 


104400 






\\f. 


SCOPE 




779 


003016 


005077 


175756 






CLr 


iCSR 


780 


003022 


012777 


177776 


175752 




■inu 


f-2«aCSB 


781 


003030 


012777 


000023 


175742 




BOV 


'23,iCSR 


782 


003036 


013737 


001026 


A A 4 AAA 

001020 




nOv 


a#DEL2«if TEnP 


783 


003044 


105777 


175730 




T 1 7* • 


TCTB 


acsR 


784 


003050 


100410 








DM r 


9 4 Y A 

T17B 


785 


003052 


062737 


A A A A A 4 

000001 


A A 4 A 1 A 

001020 




ADD 


#1 ,af TEnp 


786 


A A 9 A ^ A 

003060 


A A 4 V ^ 4 

001371 








BNC 


T17A 


787 


003062 


042777 


M A A A A 4 

000001 


4 "Vr ^ 4 A 

175710 




Dtr 

Bin 


#1 ,iCSR 


788 


A A V A ^ A 

003070 


4 A < AAA 

104000 








Ul T 




789 


003072 


A A P W ^ 

005777 


4 ^ f V A^ 

175706 




T 1 70 • 


TCT 


A^ V A 

aCTR 


790 


003076 


001401 










.♦4 


791 


A A9 4 A A 

003100 


4 A 1 AAA 

1 04000 








Ul T 




792 












C DCO 
r NcHa 




793 


003102 


104400 






r 1 A> 


crriDC 




79A 


003104 


A A P ^ 

005737 


A A y 1 f A 

006252 






TCT 


a#X0RFL6 


795 


AAV 4 4 A 

003110 


4 A A / V 1 

1 00432 








ant 

Dm 




796 


AAV 4 4^ 

003112 


A A r A^ *9 

005077 


1 75662 






ri 0 


acsR 


797 


AAV 4 4^ 

003116 


012777 


177776 


175656 




nuv 


f*2,iCSB 


798 


003124 


A 4 V^ V 

012777 


A A A A1 r 

000025 


175646 




nuv 


ao C A 

#25,aCSR 


799 


A A V 4 V 

003132 


013737 


A A 4 A V A 

001030 


A A 4 A A 

001020 




■nu 

nuv 


•%aA^i V AaVP MA 

ifOcL3,d#TEnP 


800 


003140 


4 A C ^ V^ 

105777 


4 VC ^ V / 

175634 




1 1 On • 


TCTB 


acsR 


80 1 


003144 


4 A A / 4 A 

1 004 1 0 








BHI 


TIBB 


802 


AAV 4 / ^ 

003146 


A^ ^ W V 

062737 


A AA AA4 

000001 


AA 4 A^ A 

001020 




ADD 


a 4 AaveMfk 


803 


AAV 4 C J 

0031 54 


A A4 V ^4 

001371 








BNE 


TiBA 


804 


AAV 4 f < 

003156 


A/ ^^V^ 

042777 


A A AA A4 

000001 


175614 




BIC 


a4 AAC*B 

#1 ,acsR 


805 


0031 64 


4 A/ AAA 

104000 








HLT 




806 


AAV 4 ^ d 

003166 


A AP V^ ^ 

005777 


4 Vr Z 4 ^ 

175612 




T18B: 


TST 


aCTR 


O A Y 

807 


AAV 4 Vl 

0031 72 


A A4 y A 4 

001401 








BEQ 


.♦4 


A/%a 

808 


A A V 4 V/ 

003174 


4 A / AAA 

104000 








HLT 




809 
















A 4 A 

810 










;EXT 


FREQ. 




811 


AAV4 V^ 

0031 76 


4 A / / A A 

104400 






T19: 


SCOPE 




812 


AAV ■^ A A 

003200 


A V ^ 

032777 


AAA A A 4 

000001 


4 ^ V ^ 

1 75636 




BIT 


f 1 ,8SR 


813 


AA V A^ 

003206 


AA4 / 

001433 








BEQ 


T 1 A 

T20 


814 


AAV^4 A 

003210 


AAC A'77 

005077 


175564 






CLR 


acsR 


A^ f 

815 


A A V ^ 4 / 

003214 


012777 


1 7777f> 


175560 




nov 


M ^ A ^ A 


o io 




ni 9777 


\J\)\l\ICf 






nov 


#97 arcD 

vcr «4l.aK 


817 


003230 


013737 


001032 


001020 




nov 


aiDEL4,a#TENP 


818 


003236 


105777 


175536 




11 9A: 


TSTB 


acsR 


819 


003242 


100411 








BHI 


T19B 


820 


003244 


062737 


000001 


001020 




ADD 


fl.af TEHP 



SLQ 0015 



;UP COUNT, 100 KHZ, GO 



; ERROR 
; ERROR 

;UP COUNT, 10 KHZ, GO 



.'ERROR 
.ERROR 



:UP COUNT. LINE. 60 



: ERROR 
.•ERROR 



;UP COUNT. EXT FREQ. GO 





y L1 1 1 D 
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MA r V 1 1 
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09:55 






BASIC 


TC C T 

Teal 


SEQ 0016 


821 


003252 


001371 










T 1 Ol 




822 


003254 


042777 


A A A A A 4 

000001 


175516 




BIC 


Mi A/* CD 




823 


003262 


104000 








111 V 

HLT 




;ERR0R, 


824 


003264 


000005 








RESET 






825 


003266 


005777 


175512 




T 1 AD . 

T19B: 


TST 


aCTR 




826 


003272 


001401 








BEQ 


.♦4 




827 


003274 


4 M ^ AAA 

104000 








HLT 




.-ERROR, 


828 










; TEST 


THAT INTERRUPT OCCURS TO PROPER 


VECTOR WITH PROCESSOR PftlORITY 4 


829 


003276 


104400 






TOA . 

T20: 


d Lurc 






830 


003300 


012737 


A A A ^ A 

000200 


177776 




nu V 


iPOO ff 


;SET PROCESSOR PRIORITY 4 


831 


003306 


A A C A^ ^ 

005077 


4 7 C y 7Z. 

1 75A76 






ri R 


Vl» K V d 


.•CLEAR INTERRUPT RETURN STATUS 


832 


003312 


AAC 

005077 










■ v n 




833 


003316 


012777 


A A AAA 1 

000002 


175456 




nu V 






834 


003324 


012777 


0033o6 


175454 




nuv 




;SET UP INTERRUPT RETURN VECTOR 


835 


003332 


01Z777 


AAAi Ai 

0001 01 


175440 








; ENABLE INTERRUPT 


836 


003340 


A4 T7T7 

013737 


A A 4 /■ y 

001024 


001020 




Hnu 






837 


003346 


AAC 117 

005237 


AAi A1A 

001020 




it. 
1»: 


INC 


BfTEnP 




838 


003352 


AA1 

001375 








BNE 


1$ 




839 


003354 


042' f 7 


AA AAAI 
000001 


175416 




BIC 


fi.acsR 




840 


003362 


1 A/ AAA 

104000 








HLT 




.•ERROR, INTERRUP. FAILED TO OCCUR. 


841 


003364 


AAAi 1A 

000420 








BR 


T21 




842 


003366 


017737 


1 7Cy AiC. 


001020 


T OA* • 


NOV 


aCSR.atTEHP 




843 


003374 


^ AC7T7 

105737 


AAi A1A 

001020 






TSTB 


afTEHP 




844 


003400 


IOQhOi 








BNI 


.♦4 




845 


003402 


1 A/ AAA 

1 OA 000 








HLT 




;OONE NOT SET ON INT. 


846 


003404 


AT 17T 7 

032737 


A A A A A 1 

000001 


001020 




BIT 


#1 ,a«TEnp 




847 


003412 


AAi / Ai 

001401 








BEQ 


.♦4 




848 


003414 


1 A/ AAA 

1 Oh 000 








HLT 




:RUN NOT CLEARED 


849 


003416 


AAC A77 

0050f / 


i 7C'XC^ 

1 75356 






CLR 


acsR 




850 


003422 


Ai 17A^ 

01 2 f 06 


AAA7 7X 
000776 






nov 


«BUFF,S6 




851 










• T C C T 

; Tc5 1 


THAT INTERRUPT OCCURS WITH PROCESSOR PRIORITY 5 


852 


003426 


104400 






tOI . 

T21 : 


SCOPE 






853 


003430 


012737 


AAAOy A 

000240 


177776 




nov 


#240, CC 


.-SET PROCESSOR PRIORITY 5 


854 


003436 


V\Cf f f 


AAIC 1 0 

003512 


175342 




NOV 


IT21A,aCKV 


:SET UP INTERRUPT RETURN STATUS 


855 


003444 


AAC A77 
0050f 7 


1 75330 






CLR 


acsR 




856 


003450 


AI 0777 


AAAAAO 

000002 


175324 




MOV 


f2,aCS8 




857 


003456 


AI 0777 

012777 


AAAi A i 

0001 01 


175314 




MOV 


fiot.acsR 


.•ENABLE INTERRUPT 


858 


003464 


Ai T7T7 

01 3737 


AAi Aoy 

001024 


001020 




MOV 


afOELi«afTEnp 




859 


003472 


00323r 


AAI AOA 

001020 




1 


INC 


afTEnp 




860 


003476 


AAI 17C 

001375 








BNE 


It 




861 


003500 


Ay 0777 


AAAAA1 

000001 


175272 




BIC 


fi.acsR 




862 


003506 


1 Ay AAA 

104000 








HLT 


.-ERROR. INTERRUPT FAILED TO OCCUR 


863 


003510 


000404 








BR 


T22 




864 


003512 


AACA77 

005077 


i 7C O^ O 

1 75262 




T 01 A . 

T21A: 


CLR 


acsR 


.•RETURN HERE AFTER INTERRUPT 


865 


003516 


A1 07AA 

012706 


AAA 77^ 

0007 76 






nov 


#BUFF,X6 




366 










■ TC C T 

; TEST 


THAT INTERRUPT IS INHIBITED WITH PROCESSOR PRIORITY 6 


867 


003522 


4 Ay y AA 
104400 






TOO . 

T22: 


SCOPE 






868 


003524 


Ai 0717 

012737 


AAAIAA 

000300 


177776 




nov 


f300,CC 


.-SET PROCESSOR PRIORITY 6 


869 


003532 


A1 0777 

012777 


AATZAO 

003602 


175246 




MOV 


fT22A,aCKV 


.-SET UP INTERRUPT RETURN 


870 


003540 


00507 7 


1 7523h 






CLR 


acsR 




871 


003544 


rtl 0777 

012777 


AAAAAO 

U000U2 


175230 




nov 


f2,acso 




872 


003552 


012777 


000101 


175220 




nov 


fioi.acsR 


.-INTERRUPT ENABLE 


873 


003560 


013737 


001024 


001020 




nov 


amLi.a#TEnp 




874 


003566 


AAC0T7 

005237 


AAi AOA 
001020 




i ft > 

' »: 


INC 


aiTEnp 




875 


003572 


001375 








BNE 


It 




876 


003574 


005077 


175200 






CLR 


acsR 
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SEO 0017 



877 003600 

878 003602 

879 003610 

880 003612 
881 

882 

883 003616 

884 003620 

885 003626 

886 003632 

887 003640 

888 003646 

889 003654 

890 003662 

891 003670 

892 003672 

893 003700 

894 003702 

895 003706 
896 

897 00'712 

898 003714 

899 003722 

900 003730 

901 003736 

902 003744 

903 003752 

904 003760 

905 003762 

906 003770 

907 003772 

908 003774 

909 003776 

910 004002 

91 1 004004 
912 

913 
914 
915 
916 
917 
918 
919 
920 
921 

922 004010 

923 004012 

924 004014 

925 C04022 

926 004024 

927 004030 

928 004036 

929 004044 

930 004050 

931 004054 

932 004056 



000406 
042777 
104000 
012706 



104400 
012737 
005077 
012777 
012777 
012777 
013737 
062737 
001374 
042777 
104000 
005077 
012706 

104400 
012737 
012777 
012777 
012777 
013737 
062737 
001374 
042777 
104000 
000406 
022626 
005237 
001 360 
005077 



000001 
000776 



000200 
175U6 
177776 
003702 
000121 
001024 
000001 



175170 T22A: 



177776 

175142 
175V-0 
175124 
001020 
001020 



000001 175100 

175072 
000776 



177700 
003774 
000010 
000111 
001024 
000001 



001016 
175056 
175044 
175034 
001020 
001020 



000001 175010 

001016 
1 74770 



104400 
C05003 

032777 000020 175022 
001002 

000137 004264 
012777 010000 174744 
012777 000001 17473<. 
017700 174734 
020027 010000 
101404 

01 0037 001020 



BR 
BIC 
HLT 
NOV 



T23 

#i,acsR 

#BUFF,X6 



.-ERROR, INT SHOULDN'T HAVE OCCURRED 



;TEST 
T23: 



T23AA: 



SINGLE INTERRUPT (MODE 0) ON 
SCOPE 

«200,CC 

acsR 

#-2,iCSB 
#T23A,aCKV 
#121,aCSR 
8#DEL1,afTENP 

#i,a«TEnp 

T23AA 

#i,acsR 



T23A: 

.-TEST 
T24: 



T24A: 



NOV 
CLR 
NOV 
NOV 
NOV 
NOV 
ADD 
BNE 
BIC 
HLT 
CLR 
NOV 



OVERFLOW 

;SET PROCCSSOR PRIORITY 4 



;SET INTERRUPT RETURN 

.•INTERRUPT ENABLE, UP COUNT, 100 KHZ, 



aCSR 

#BUFF,S6 
REPEATED INTERRUPT (NODE 1). 

SCOPE 

#-100,TENP1 
fT24B,aCKV 
«10,aCSB 

fiiuacsR 
afDai.a#TENP 

#1 ,af TEHP 
.-6 

*i,acsR 



T24B: 



NOV 
NOV 
NOV 
NOV 
NOV 
ADD 
BNE 
BIC 
HLT 
BR 
CNP 
INC 
BNE 

:lr 



T24C 

(6)*, (6)* 
TENP1 
T24A 
aCSR 



.•SYNCHRONIZATION TEST 
:N0. 1 FOR 
;KU11-P BOARDS THAT 
;ARE REV F OR GREATER 



T24C; 



1$: 



SCOPE 




CLR 


X3 


BIT 


f20,aSR 


BNE 


IS 


JNP 


T25 


NOV 


fioooo.acsB 


NOV 


#i,acsR 


NOV 


acTR.xo 


CNP 


X0,# 10000 


BLOS 


2S 


NOV 


XCafTENP 



GO 



;yASTE TINE 



.-ERROR. INTERRUPT FAILED TO OCCUR. 
.-RETURN HERE AFTER INTERRUPT. 
.-RESET STACK 



SET UP COUNTER FOR INTER 
SET INTERRUPT RETURN 
SET UP COUNT SET BUFFER 

INTERRUPT ENABLE, REPEATED INTERRUPTS, 100 ^HZ, 



;ERR0R. INTERRUPT FAILED TO OCCUR 
;P0P STACK 

.-DONE 100 INTERRUPTS? 
:N0 

.CLEAR CLOCK 



LOAD COUNTER 

GO COUNT DOWN. 100 KHZ 

SAVE CTR 

DID COUNT INCREASE? 
BRANCH IF OK TO 1$ 



F 2 

CZKWBJO KU11-P 9T CLK TST HACYII 30A(1052) 19-APR-78 09:58 PAGE 
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AO . C C 
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933 


00A062 


1 A/ AAA 

104000 












93A 




AAA/ Af 

000404 










QIC 

V35 


00<(066 


AAC A77 
0050f f 


17/ 7nA 

1 f 4f Oo 




0« . 


r 1 D 


ar CP 


936 


AA/ A7"5 


AAC OA*? 

005^05 








f kjr 
1 NL 


tx 


937 


AAf A7 / 


Art 4 TC C 

001355 








BNE 


IS 


938 
















939 
















9^0 
















QJ 1 

9*»1 










:SYNCHR0NIZATI0N TEST 












■ MD 7 
a nlU « C 


FOR KW11-P 


9«»3 










, DUAnl/d 


THAT 


ARE 


9AA 










c nC V r 


OR GREATER 


9^5 
















9A0 
















O/ 7 

9Hr 


AA/ A7A 


1 A/ LC\r\ 

1 U4400 






T74n • 


^CDPP 

^ l» wr t 




9Ao 


AA/ 1 AA 


A1 77/. A 
01 f f 40 


17/ 7/^0 
1 f 4 f 






MOV 


aCKV -(Z6) 


Qi Q 

9s9 


AA/ i A/ 


A1 0777 


AAA7Z A 

000340 


AAOCOA 

00c5^0 




NOV 


#340 apsu 


950 


AA/ 110 
00^1 1 C 


nncrt'17 
0050 Jf 


Art/ OAA 
UU*»c*»0 






t L. n 


TIKTIK 


QC 1 

951 


Art/ 1 1 A 


0050jf 


rtrtZit TO 

OOOOjc 






V L n 


CNT 


9 JC 


OOmI 


ni 0777 
\JtCf 1 ' 


rtrt/ o/,n 


1 7AA^A 




MOV 


f CLKSER.aCKV 


Q^T 

y J J 


nn/ 1 


n^ 0777 
0 1 c f f f 


AAATAA 

UUUjUU 


1 7Z,A^0 
1 1 *»0 JC 




nov 


#300 aCKVS 


95^ 


AA/ 1 7A 


A1 0777 
\i\cf f f 


rtAAAl A 

UOUU 1 0 


1 7A ATA 
1 f •lO JO 




nov 


#10 acsB 


9j J 


AA/ 1 / / 


r»1 0777 
\i\C.( f f 


AAA1 1 1 

UUUI 1 1 


1 f *tOcu 




nov 


#1 11 .acsR 


OCA 

950 
































950 


AA/ ICO 








L OOP - 








A A/ 1 CO 


ni 0777 
Olcf f f 


f\f\f\XLf\ 
U0U5*»U 


UUchOU 




nov 


#340.aPSU 


90U 


AA/ 1 4.f\ 

UUm 1 6U 


00*» f ji 


AA/,0'»fl 

UU*»c5U 






JSR 

\J w r\ 


PC, TYPE 


VO 1 


AA/ 1 

UU*» 1 Oh 


OUDOf 1 








CLR 

V k n 


iPSU 


9o<: 


AA/ 1 7A 
UvH 1 f U 


ni 77ni 
U 1 Jf U 1 


UU*it*»0 






nov 


TIICTIIC.R1 




AA/ 1 7/ 


OuH f jl 


UUHcOU 






JSR 


PC, TYPE 


OA/. 


AA/ OAA 




UU*»c*iO 






cnp 


TIKTIK, R1 


OAC 


AA/ OAA 


UU 1 UU 1 








BNE 


1$ 


OAA 

yoo 


UUmcUO 


1 n/.nnn 

1 ViUUO 








HLT 




QA7 
















TOO 
















OAO 
TOT 
















Tf U 
















071 


A A/ 01 A 








IS: 






079 


Art/ 01 n 


UU5t Jf 


DHAATO 
UUOOjc 






INC 


CNT 


Q71 




f\J07X7 
Mccf jl 


UUv 1 f u 


nnAATo 

UUOD JC 




cnp 


#120., CNT 


OIL 
Tf «l 




UU 1 J J J 








BNE 


LOOP 


07^ 

Tf J 


UUhcC*» 


ni 9A77 
U 1 COf ( 


1 f «l J jO 






nov 


(X6)^,aCKV 


07A 
Tf 0 


UUhc 


\J\JJ\Jf f 


1 TL^LL 






CLR 


acsR 


077 
Tf f 


nrtz, 0 XL 


nnm xy 

UUU 1 Jf 


UU<icO*i 






jnp 


T25 


07A 

Tf O 
















07Q 

Tf T 


AA/ O/A 








CLKSER: 






you 


AftZ, OiA 


UUJCJI 


UUhchO 






INC 


TIKTIK 


yo 1 










CLKXIT: 






OR? 

yoc 




UUUUUc 








RTl 




yo J 


















004246 


000000 

WWW 






TIKTIK: 


0 




985 
















986 


004250 


105777 


1745A0 




TYPE : 


TSTB 


aTCSR 


987 


004254 


100375 








BPL 


TYPE 


988 


004256 


110077 


174530 






novB 


RO,aTDBR 



18 

SEO 0018 

SYNC ERROR 
END TEST 
CLR CSR 

NO OF TIMES THROUGH PROGRAM DETECTS 2(16) 
2(16) YET, IF NOT GO BACK TO LOOP 1 



SAVE CLOCK VECTOR 
PSs7 STOPS ALL INTRS 
CLEAR CLOCK COUNTER 
CLEAR ITERATION COUNT 
SETUP INTR SERVICE RTN 
SETUP INTR PSU 
KW11 COUNT = 10 
SET TO RUN aiOOKH 
INTR ENABLE t COUNT DOWN 
AND REPEAT INTR MODE 

PS=7 STOPS ALL INTRS 

lOOnS DELAY aPR7 

PS=0 ALLOWS INTRS 

GET CURRENT CLK COUNT 

100NS DELAY aPRO 

ANY INTRS DURING DELAY? 

IF YES,GO TO U 

ELSE THERE WAS AN ERROR 

CHECK FOR JUMPERS ON THE 

KW11~P BOARD NEAR I.C. 

LOCATIONS E41 % ESI ON REV F 

BOARD \ GREATER ONLY 



120 ITERATIONS? 
IF NOT, GO BACK TO LOOP 
ELSE RESTORE THE VECTOR 
CLEAR CONTROL REG 
AND GO TO NEXT TEST 



;INC CLK COUNTER 
.-ELSE EXIT RTN 



READY TO SEND 
BR IF NOT 

SEND THEn A MESSAGE 



CZICWBJO 


KWII-P 


RT CLK TST 


BACVn 


30A(1052) 19- 


G 2 

APR-78 09:58 PAGE 19 




CZKUBJ . 


P11 


19-APR-78 


09:55 






BASIC 


TEST 




SEfl 0019 


989 


004262 


000207 








RTS 


PC 






990 




















991 




















992 




















993 




















9Q4 




















995 










;TEST 


100 KHZ 


REPEATABILITY 






996 


004264 


104400 






T25: 


SCOPE 








997 


004266 


032777 


000004 


174550 




BIT 


#4.aSR 


;ARE TWO CLK'S PRESENT 




998 


004274 


001002 








BNE 


3S 


.'BRANCH IF SU#2 IS UP 




999 


004276 


000137 


004740 






JMP 


▼ ^ 

T27 


:EXIT IF ONLY ONE CLK 




1000 


004302 


005077 


174472 




3$: 


CLR 


acsR 






1001 


004306 


012777 


000000 


174466 




MOV 


#o,acsB 


;SET CTR 




1002 


004314 


012777 


A A A A 4 

000021 


174456 




MOV 


#21 ,acsR 


Aa *A1 V 1 aA 4 AAuj*4 ^A 

; COUNT UP 100KH2 GO 




1003 


004522 


004537 


004416 






JSR 


RS.DELY 


;G0 TO DELAY SUBROUTINE 




1004 


004326 


105777 


1 74446 






TSTB 


acsR 


;TEST DONE BIT SET 




1005 


004332 


100001 








BPL 


It 






1006 


004334 


4 A > AAA 

104000 








HLT 




;0ONE BIT SET TOO SOON 




1007 


004336 


017737 


174442 


001020 


IS: 


NOV 


aCTR,a#TENP 


.'DONE NOT SET SO SAVE CTR 




1008 


004344 


005077 


174430 






CLR 


acsR 






1009 


004350 


012777 


A A A A A A 

000000 


174424 




MOV 


#o,acsB 






10:0 


004356 


012777 


A A A A 4 

000021 


174414 




NOV 


#21 .acsR 






1011 


004364 


004537 


004416 






JSR 


RS.DELY 






1012 


004370 


105777 


174404 






TSTB 


acsR 






1013 


004374 


« A A A A 4 

100001 








BPL 


2S 






1014 


004376 


4 A / AAA 

104000 








HLT 








1015 


004400 


017737 


174400 


001016 


2»: 


nov 


<k«kVA <kAtV^ MM 4 

aCTR,a#TENP1 


% A ^ ft ft ^ A A ^ ^AftftVAft ^ A ^ ^ A ft V 

.'HERE UE ARE SAVING SEC CNT 




1016 


004406 


A A / r V *V 

004537 


004446 






JSR 


R5,CACL 


;G0 DETERNINE ACCURACY OF CNT'S 




1017 


004412 


4 A / AAA 

104000 








HLT 








1018 


004414 


A A A y T *t 

000432 








BR 


T25A 






1019 




















1020 


004416 


005077 


002154 




DELY: 


CLR 


acsRi 


^ V ft A W A ft tfk 4^ ft ft V V Aft^ 

.'DELAY SUBROUTINE 




1021 


004422 


012777 


AA4 4 VA 

001 1 30 


002144 




NOV 


M4 4 VA 4JkMn4 




1022 


004430 


A 4 

012777 


A A A A ^ 4 

000021 


002140 




NOV 


#2i ,acsRi 






1023 


004436 


4 A F ^ ^ ^ 

105777 


A A ^ 4 T / 

002134 




If : 


TSTB 


acsiii 


■ ■ ■ V V ^ AA M • ft 

.'WAIT 600 NIL. 




1024 


004442 


100375 








BPL 


4 A 

IS 






1025 


004444 


AAA A r 

000205 








RTS 


A r 

RS 






1026 




















1027 


004446 


A 4 A A 

013700 


A A4 A A 

001020 




CACL: 


NOV 


a#TENP,RO 


Jk AM A >A^ AVA4 #kVA^ 

.'CONPARE CTR1 WITH CTR2 




1028 


004452 


A 4 A 4 

013701 


A A 4 A4 A 

001016 






NOV 


a#TEHP1«R1 






1029 


004456 


4 ^ AA 4 

16"001 








SUB 


R0,R1 






1030 


004460 


4 Aa % A 4 

IOOJOI 








BPL 


IS 






1031 


004462 


A A f y A 4 

005401 








NEG 


R1 






1032 


004464 


022701 


A A A A A P 

000005 




1$: 


CNP 


#5.R1 


tfk ■ ^ ^ ^ A ^ Aft ^ ft ft A V ff^ ^ ft^#*A VftftAAft P 

.DIFFERENCE NUST BE LESS THAN 5 




1033 


004470 


002401 








BLT 


2S 






1034 


004472 


A AC 

005725 








TST 


(R5)* 


.'UPDATE RETURN 




1035 


004474 


A 4 A4 T "7 

010137 


AA4 A^A 

001 02r 




2t: 


NOV 


R1 ,TENP 


,'DEFRtNCE FOR PRINT OUT 




1036 


004500 


A AA^ Ac 

000205 








RTS 


R5 




1037 


















1038 










; TEST 


10 KHZ 


REPEATABILITY 






1039 










;THIS 


TEST IS 


THE SANE AS T25 


EXCEPT IT IS 




1040 










.FOR 


10KHZ. 








1041 


004502 


104400 






T25A: 


SCOPE 








1042 


004504 


005077 


1 74270 






CLR 


acsR 






1043 


004510 


012777 


000000 


174264 




NOV 


#o,acsB 






1044 


004516 


012777 


000023 


174254 




NOV 


#23,acsR 







CZHWBJO Kyl1-P RT CLK TST 
CZKUBJ.P11 19-APR-78 09:55 



HACY11 30A(1052) 19-APR-78 



H 2 
09:58 PAGE 



20 



1045 

10A6 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1065 

1064 

1065 

1066 

1067 

1068 

1069 

1070 

1071 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 

1080 

1081 

1082 

1083 

1084 

1085 

1086 

1087 

1088 

1089 

1090 

1091 

1092 

1093 

1094 

1095 

1096 

1097 

1098 

1099 

1100 



004524 
004530 
004534 
004536 
004540 
004546 
004552 
004560 
004566 
004572 
004576 
004600 
004602 
004610 
004614 



004537 
105777 
100001 
104000 
017737 
005077 
012777 
012777 
004537 
105777 
100001 
104000 
017737 
004537 
104000 



004416 
174244 



174240 
174226 
000000 
000023 
004416 
1742C2 



174176 
004446 



001020 1$: 

174222 
174212 



001016 2$: 



BASIC 


TEST 


JSR 


R5.0ELY 


TSTB 


acsR 


BPL 


It 


HLT 




NOV 


aCTR,a#TEHP 


CLR 


acsR 


MOV 


#c,acsB 


MOV 


f 23,aCSR 


JSR 


R5,0ELY 


TSTB 


acsR 


BPL 


2> 


HLT 




NOV 


aCTR,a#TEN>1 


JSR 


R5.CACL 


HLT 





SEQ 0020 



TEST LINE REPEATABILITY 
THIS TEST IS THE SANE AS 











-FOR 


LINE FREQ. 




004616 


104400 






T26: 


SCOPE 




004620 


005737 


006252 






TST 


aiXORFLG 


004624 


100445 








BNI 


T27 


004626 


005077 


174146 






CLR 


acsR 


004632 


012777 


000000 

www 


174142 




NOV 


fO^acsB 


004640 


012777 


000025 


174132 




NOV 


#25,acsR 


004646 


004537 


004416 






JSR 


R5.DELY 


004652 


105777 


174122 






TSTB 


acsR 


004656 


1 00001 








BPL 


1$ 


004660 


1 04000 








HLT 




004662 


017737 


174116 


001020 


IS: 


NOV 


aCTR,a#TEHP 


004670 


005077 


174104 






CLR 


acsR 


004674 


012777 


000000 


174100 




NOV 


#o.acsB 


004702 


012777 


000025 


174070 




NOV 


f25,aCSR 


004710 


004537 


004416 






JSR 


R5.DELY 


004714 


105777 


1 74060 






TSTB 


acsR 


004720 


100001 








BPL 


2% 


004722 


104000 








HLT 




004724 


017737 


174054 


001016 


2t: 


NOV 


aCTR,a«TENP1 


004732 


004537 


004446 






JSR 


R5.CACL 


004736 


104000 








HLT 












.TEST 


ERROR (BIT 15) TO SET Ul 


004740 


104400 






T27: 


SCOPE 




004742 


005077 


1 74052 






CLR 


acsR 


004746 


012737 


000340 


177776 




NOV 


#340, CC 


004754 


012777 


000002 


1 74020 




NOV 


l2,aCSB 


004762 


012777 


0001 1 1 


174010 




NOV 


#iii,acsR 


004770 


013737 


00102* 


001020 




NOV 


amLi ,a#TENP 


004776 


062737 


000001 


001020 




ADD 


#1,a«TENP 


005004 


001374 








BNE 


.-6 


005006 


005777 


173766 






TST 


8CSR 


005012 


100404 








BNI 


IS 


005014 


042777 


000001 


173756 




BIC 


#i,acsR 


005022 


104000 








HLT 




005024 


005077 


173750 




1$: 


CLR 


8CSR 


005030 


005777 


173744 






TST 


acsR 


005034 


100001 








BPL 


.♦4 



T25 EXCEPT IT IS 



SET PROCESSOR PRIORITY 7 

SET COUNTER FOR FAST INTERRUPTS 

INT EN, REPEATED INT, DOUN COUNT. 100 KHZ. GO 



.'ERROR. ERROR (BIT 15) NOT SET 



CZKUBJO KWIV 
CZKUBJ.P11 



P RT CLK TST HACY11 
19-APR-78 09:55 



50A(1052) T9-APR-78 09 
BASIC TEST 



1 

58 



2 

PAGE 



1101 


005036 


104000 






1102 










1103 


0050A0 


104400 




177776 


1104 


005042 


012737 


000340 


1105 


005050 


012777 


000002 


173724 


1106 


005056 


012777 


000111 


173714 


1107 


00506A 


013737 


001024 


001020 


1108 


005072 


062737 


000001 


001020 


1109 


005100 


001374 






1110 


005102 


005777 


173672 




1111 


005106 


100404 






1112 


005110 


042777 


000001 


17366? 


1113 


005116 


104000 






11U 


005120 


000005 






1115 


005122 


005777 


173652 




1116 


005126 


100001 






1117 


005130 


104000 






1118 


0051 32 


104400 






1119 










1120 










1121 


0051 3A 


012777 


000207 


173650 


1122 


005U2 


105777 


173646 




1123 


0051 A6 


100375 






112A 


005150 


012777 


000000 


173634 


1125 


005156 


105777 


1 73632 




1126 


005162 


100375 






1127 


005164 


013702 


000042 




1128 


0051 70 


001405 






1129 


005172 


000005 






1130 


005174 


004712 






1131 


005176 


000240 






1132 


005200 


000240 






1133 


005202 


000240 






1134 


005204 


000137 


001150 





.•TEST 
T27A: 



IS: 



HLT 
BIT 15 IS 
SCOPE 

nov 

MOV 

MOV 

MOV 

ADD 

BNE 

TST 

BMI 

BIC 

HLT 

RESET 

TST 

BPL 

HLT 

SCOPE 



CLEARED BY INIT 

#340, CC 
#2.aCSB 

#111 ,acsR 

a#DELl,a#TEHP 
#1 ,a#TEMP 
.-6 

acsR 

IS 

ii,acsR 



acsR 

.♦4 



.BELL ON PASS COMPLETE 



TSTEND: MOV 
TSTB 
BPL 
MOV 
TSTB 
BPL 
MOV 
BEQ 
RESET 

LOGICAL: 

NOP 
NOP 
NOP 

TRPA: JMP 



«207.aTDBR 

aicsR 

.-4 

fO.iTDBR 

aiCSR 

.-4 

a#42.X2 
TRPA 



JSR 



BEGIN 



tJAZ) 



;ERR. FAILED TO CLEAR WHEN REF. 



;BIT 15 NOT SET 

;BIT 15 NOT CLEARED BY RESET 

.SEND A NULL CHAR. 



CZKUBJO 


KU11-P 


RT CLK 


TST 


MACY11 


J 

30A(1052) 19-APR-78 09:58 


CZKUBJ.PH 


19-APR-78 09:55 




BASIC 


TEST 


1135 














n 36 










.SBTTL 


TINING TEST 


1137 










;R1NG TELETYPE 


BELL AT 10 SE 


1 -1 IQ 

11 3o 










;1ST HINUTE = 


100 KHZ 


1 1 39 










;2ND HINUTE = 


10 KHZ 












:3RD MINUTE = 


LINE 


1 1 / i 
11^1 










:4TN niNUTE - 


EXTERNAL 
















1 1 '•3 


AAC 0 1 A 


A 1 3 7AX 
01 06 


A AA77X 

OOOr /o 




BEGIN1: nOV 


fBUFF,X6 


1 1 y y 

1 1 


AACH y 


A Ay 717 

00H^3r 


AI 1 AC3 

01 1 652 




JSR 


X7,SWADJ 


i 1 y c 
1 ls5 




A1 T777 
013f f f 


AA1 AI A 
001010 


1 77CAA 
1 1 J50U 


nov 


CKVS.aCKV 


1 1 y X 

1 1 HO 




A1 3777 


AAnnA3 
000002 


1 77CCZ 


nov 


#RTI,aCKVS 


1 1 y 7 
1 1 «i f 


AAC IT/ 


A1 37*17 

Olcf 3r 


AAC AA3 

005602 


nAAA3 A 

00Ou2h 


NOV 


fpyRF2,24 


1 i y o 

1 1 HO 


AAC3/ 3 


AAAAA C 
000005 






RESET 




1 1 y Q 










;100 KHZ 




1 1 pO 


AAC 3/ / 
005£*tH 


A1 3777 


1 y 1 C 3A 

1 Hi 520 


1 77C7A 
1 / 3530 


NOV 


f 50000., acsB 


1 1 51 


AAC 3C 3 


A1 37AA 

01 <'rOO 


1 77773 

\ . 1 1 1 C 




NOV 


#-6,X0 




AAC3CA 


A1 37A1 
01 Cf Ul 


1 777CZ 
1 1 1 10** 




T28: NOV 


f-20..I1 


1153 


AAC 3A3 
UU5£OC 


A1 3777 


AAA1 1 1 
0001 1 1 


1 77C1 A 
1 /33 10 


NOV 


fiii.acsR 


1 1 5s 


AAC37A 


AAAAA1 
OUOOOl 






T28A: WAIT 




1 1 J J 


AAC373 
UU3t f C 


AAC3A1 

0U5cUl 






INC 


XI 


1 1 5o 


AAC37Z 
UU3t f H 


AA1 T7C 

OUl if 5 






BNE 


T28A 


1 1 Jf 


AAC37A 


1 AC77 7 

1 05/ f r 


1 77C1 3 

1 f 3512 




TSTB 


aTCSR 


1 1 JO 


AACtA3 

0U53Uc 


1 AA77C 
1 003/5 






BPL 


.-4 


1 1 5V 


AAC7A/. 

UU5 JUS 


A1 3777 


AAA3A7 

00020/ 


1 77CAA 
1 / 35UU 


NOV 


f207.aTDBR 


\ 1 oU 


AACT1 3 

00531 <: 


AAC3AA 
0052UU 






INC 


xo 


11/11 


AAC71 A 
U055 1*1 


AA1 7AA 

00 1 jOO 






BNE 


T28 


11/13 


AAC 71 A 


AZ3777 


AAA1 AI 


1 77Z KL 
1 / 3h >H 


BIG 


fioi.acsR 


1 103 










:10 KHZ 




1 1 


nAC73/. 
UU5 Jc*» 


A1 3777 

\j\cr f f 


A1 1 AI A 

U 1 1 0 1 U 


1 77ZCA 
1 / 3h3U 


NOV 


#5000.. acsB 


1 1 AC 


AAC773 


A1 3 7AA 


1 77773 
\ 1 I 1 1 C 




NOV 


f-6,X0 


1 1 

1 1 00 


AAC^TA 
UU5 jjO 


A1 37A1 
0 1 c ( U 1 


1 777CZ 
\ t 1 1 3h 




T29: NOV 


#-20., XI 


11/7 


AAC7Z3 
UU5 


A1 3777 
\J 1 CI f f 


AAA 117 
UUU 1 1 J 


1 77Z7A 
1 / 3H3U 


NOV 


#113.aCSR 


1 1 AR 

1 lOo 


AAC7CA 
Uw5 j3U 


AAAAA 1 
UUUUU 1 






T29A: WAIT 




1 1 AO 
1 1 Ot 


AAC7C3 


AAC3A1 
Uv5cU 1 






INC 


XI 


1 1 f U 


AAC7CZ 


AA1 77C 






BNE 


T29A 


1171 


AACTCA 


1 AC777 


1 77Z73 

1 / JH JC 




TSTB 


aTCSR 


1 1 73 
lire 


AACTA3 


1 AA'77C 






BPL 


.-4 




AAC7AZ 
UU j30<« 


Ai 3777 


AAA3A7 


1 77Z3A 
1 r 3*icU 


NOV 


#207.aTDBR 


1 1 7L 

1 1 f H 


AAC773 


AAC3AA 






INC 


XO 


1 1 7S 


nAC77A 
UU3 J r •» 


AA1 7AA 
UU 1 3uU 






BNE 


T29 


1 1 7A 


AAC77A 
yjUjjf O 


AZ3777 
U«»e III 


AAA1 AI 
UUU 1 U 1 


1 7777Z 
1 f j3/H 


BIC 


#101.aCSR 


1 1 77 

1 1 f f 










;SET UP FOR 10 


SECONDS AT LI 


1 1 7a 

1 1 r O 


AACAAZ. 


AAC777 
UU3 / J« 


AAA3C3 




TST 


a#X0RFLG 


1 1 70 


AACZ1 A 


1 AnA77 
1 UUOr r 






BNI 


BEGIN1 


1 1 flA 


AACZ1 3 
UU3*» 1 1 


Ai 3777 

\J iCi ji 


AA1 1 7A 
UU 1 1 jU 


AACC7A 
U055/U 


NOV 


#600., LINE 


1 1 fli 

1 1 S 1 


AACZ3A 


A73777 

VJCf 1 1 


AAAAA3 


177Z1A 
1 / JH 1 0 


BIT 


#2,asR 


1 1 S3 
1 1 Oc 


AACA3A 


AA1ZA7 
UU iHMj 






BEO 


.♦10 


1107 


UU3*I jv 


\1 \ CI jl 


UUU 1 OH 


AACC7A 
UU33/U 


NOV 


#500., LINE 


118A 










.LINE 




1185 


005A36 


013777 


005570 


1 7777A 
1 / 3330 


NOV 


LINE.aCSB 


1186 


005AA4 


012700 


177772 




NOV 


#-6,X0 


1187 


005450 


012777 


000115 


1 77733 
1 r JJCC 


NOV 


«115,8CSR 


1188 


005456 


000001 






T30: WAIT 


1189 


005460 


105777 


173330 




TSTB 


8TCSR 


1190 


005464 


100375 






BPL 


.-4 
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SEQ 0022 



;HAS THIS CPU HAVE A SWITCH REG.? 
:INIT POWER FAIL POINTER 



;INIT COUNT SET BUFFER FOR .5 SECONDS 
;COUNT 6(10 SECOND) INTFRVALS 
; COUNT 20(.5 SECOND) INTERVALS 

;100 KHZ, REPEATED INTERRUPTS, INTERRUPT ENABLE. GO 

:D0NE 10 SECONDS? 
;N0 



DONE 6 TINES? 
NO 

YES DISABLE INTERRUPTS 

INIT COUNT SET BUFFER FOR .5 SECONDS 
COUNT 6(10SECOND) INTERVALS 
COUNT 20(.5 SECOND) INTERVALS 

10 KHZ. REPEATED INTERRUPTS, INTERRUPT ENABLE. GO 

DONE 10 SECONDS? 
NO 

YES, RING BELL 



DONE 6 TINES? 
NO 

YES, DISABLE INTERRUPTS 



;INITIALZE COUNT SET BUFFER FOR 10 SECONDS 
.-COUNT 6 (10 SECOND) INTERVALS 
.'LINE, REPEATED INTERRUPTS, INTERRUPT ENABLE. 60 



CZICWBJO KW1V 
CZKUBJ.P11 



P RT CLK TST 
19-APR-78 09:55 



I1ACY11 30A11052) 19-APR-78 
TIMING TEST 



K 2 
09:58 PAGE 



23 



SEQ 0023 



1191 


005466 


012777 


000207 


173316 


nov 


/V207,aTDBR 


RING BELL 


1192 


005A7A 


005200 






INC 


xo 


DONE 6 TINES 


1193 


005A76 


001367 






BNE 


T30 


NO 


119A 


005500 


042777 


000101 


173272 


SIC 


f101,acSR 


YES—DISABLE INTERRUPTS 


1195 


005506 


032777 


000001 


173330 


BIT 


ii,asR 




1196 


0055U 


001635 






BEQ 


BEGIN1 




1197 










.■EXTERNAL (LINE 


FOR NAINTENANCE) 




1198 


005516 


013777 


005570 


173256 


NOV 


LINE.aCSB ;INITIALZE COUNT SET BUFFER FOR 10 SECONDS 


1199 


005524 


012700 


177772 




NOV 


*-6,X0 


•COUNT 6 (10 SECOND) INTERVALS 


1200 


005530 


012777 


000117 


173242 


MOV 


irl17,aCSR ;EXT FREQ, REPEATED INTERRUPTS, INTERRUPT 


1201 


005536 


000001 






T31: WAIT 






1202 


00S540 


105777 


173250 




TSTB 


aTCSR 




1203 


AMP C / / 

00554A 


4 AAV 

100375 






BPL 


.-4 




120A 


005546 


012777 


000207 


173236 


NOV 


#207,aTD8R 


;RING BELL 


1205 


005554 


005200 






INC 


XO 


;DONE 6 TINES 


1206 


005556 


001367 






BNE 


T31 


;N0 


1207 


005560 


042777 


000100 


173212 


BIC 


#ioo,acsR 


;YES, DISABLE INTERRUPTS 


1208 


005566 


000610 






BR 


BE6IN1 


;REPEAT 


1209 


005570 


001 1 30 






LINE: 600. 







ENABLE , GO 



CZKUBJO KU11-P CLK TST 
CZKUBJ.P11 19-APR-78 09:55 



NACY11 50A(1052) 19-APR-78 
SUBROUTINES 



L 2 
09:58 PAGE 24 



SEQ 0024 



1210 










.SBTTL 




SUBROUTINES 






1211 










: POWER 


FAIL HANDLERS 






1212 


005572 


012737 


001 1 50 


005646 


PURFl : 


nov 


jTBEGIN, PURRTN 






1213 


005600 


000403 








BR 


PURDUN 






12U 


005602 


012737 


005210 


005646 


PURF2: 


nov 


fBEGINI .PURRTN 






1215 


005610 


012737 


005620 


000024 


PURDUN: 


HOV 


#PURUP,24 






1216 


005616 


000000 








HALT 








1217 


005620 


012706 


000776 




pyRUP : 


nov 


#BUFF.X6 






1218 


005624 


005000 








CLR 


ZO 






1219 


005626 


005200 








INC 


XO 






1220 


005630 


001376 








BNE 


.-2 






1221 


005632 


012702 


006472 






nov 


#nSGPUR,X2 






1222 


005636 


004737 


006266 






JSR 


X7.T0P 






1223 


005642 


000177 


000000 






jnp 


aPURRTN 






1224 


00^646 


001150 






PURRTN: 


BEGIN 








1225 




















1226 










.•ENTERED WITH 


SYSTEn TRAP CALL (HLT) 




1227 










.•PRINT 


PC, STATUS REGISTER. COHAND 


REGISTER. BYTE COUNT, CURRENT ADDRESS, 


1228 


005650 


037727 


173170 


020000 


PRINT: 


BIT 


aSR. #20000 




;TEST FOR INHIBIT PRINT OUT 


1229 


005656 


001401 








BEQ 


.♦4 




.'BRANCH TO PRINT 


1230 


005660 


000002 








RTI 






.-INHIBIT. RETURN TO nAIN STREAH 


1231 


005662 


012702 


006370 






nov 


inSG! .Z2 






1232 


005666 


005737 


005764 






TST 


PRINTl 






1233 


005672 


001402 








BEQ 


.♦6 






1234 


005674 


012702 


006432 






nov 


#nS62.Z2 






1235 


005700 


004737 


006266 






JSR 


X7.T0P 




.•PRINT ERROR HEADING 


1236 


005704 


005237 


005764 






INC 


PRINTl 






1237 


005710 


011602 








nov 


{6),X2 






1238 


005712 


162702 


000002 






SUB 


f2,Z2 






1239 


005716 


004737 


005766 






JSR 


Z7, OCTPRT 




.■PRINT PC 


1240 


005722 


017702 


173052 






nov 


aCSR,Z2 






1241 


005726 


004737 


005766 






J on 


t7 nfTPPT 




•PRINT CTATIIC RFGICTFR 


1242 


005732 


01 7702 


173046 






nov 


aCTR.Z2 






1243 


005736 


004737 


005766 






JSR 


Z7.0CTPRT 




; PR INT COUNTER 


1244 


005742 


013702 


001020 






nov 


TEnP.Z2 






1245 


005746 


004737 


005766 






JSR 


Z7, OCTPRT 




;PRINT TEnP 


1246 


005752 


005777 


173066 






TST 


asR 




: CHECK SR FOR HALT SWITCH 


1247 


005756 


100001 








BPL 


.♦4 






1248 


005760 


000000 








HALT 






;HALT ON ERROR UP 


1249 


005762 


000002 








RTI 






.•RETURN TO nAINLINE 


1250 


005764 


000000 






PRINTl : 


0 








1251 










.•PRINT 


OCTAL 


VALUE IN REGISTER2 






1252 


005766 


012737 


000060 


006100 


OCTPRT: 


nov 


#'0«CHAR 




.•INITIALIZE 1ST NUnBER AS 0 


1253 


005774 


005702 








TST 


Z2 




;IS VALUE POSITIVE 


1254 


005776 


100003 








BPL 


OCTl 




;VES PRINT 0 


1255 


006000 


012737 


000061 


006100 




nov 


»'1,CHAR 




;N0 PRINT 1 


1256 


006006 


004737 


006102 




OCTl: 


JSR 


X7.0CTP 






1257 


006012 


006102 








ROL 


Z2 






1258 


006014 


006102 








ROL 


Z2 






1259 


006016 


012737 


1777/3 


006076 




nov 


#-5. OCT 




.-COUNT 5 DIGITS 


1260 


006024 


006102 






0CT2: 


ROL 


Z2 






1261 


006026 


006102 








ROL 


Z2 






1262 


006030 


006102 








ROL 


Z2 






1263 


006052 


010237 


006100 






nov 


Z2,CHAR 




.•SAVE DIGIT 


1264 


006036 


042737 


]77770 


006100 




BIC 


#777770. CHAR 




.•CLEAR OTHER BITS 


1265 


006044 


052737 


000060 


006100 




BIS 


#60, CHAR ^ 




;MAKE ASCII DIGIT 



CZKUBJO 


KU11-P 


RT CLK TST 


HAcril 


N 2 

30A{1052) 19-APR-78 09:58 PAGE 


25 




CZKUBJ. 


P11 


1 0-ADB-7A 








SUBROUTINES 




SEQ 0025 


1266 


006052 










ROR 


12 






1267 


006054 




ftftAI ft? 






JSR 


X7.0CTP 




;PRINT 


1268 


006060 


OrtAI ft? 








ROL 


%2 






1269 


006062 




OftAft7A 






INC 


OCT 




;*1 TO DIGIT COUNT 


1270 


006066 


ftft1 X^f 

\J\J 1 JJC 








BNE 


0CT2 




.-NOT DONE 


1271 


006070 










JSR 


X7,SP3 






1272 


006074 


riftflpft? 








RTS 


X7 




.-EXIT 


1273 


006076 








OCT • 


0 








1274 


006100 


UvUvvV 








0 








1275 


006102 


1 VJ 1 t 1 


177706 




nrTP • 


TSTB 


aTCSR 






1276 


006106 










BPL 


.-4 




;UAIT FOR READY 


1277 


006110 


01 3777 


006100 

WWW i WW 


172674 




nov 


CHAR.STDBR 




;PRINT 


1278 


006116 


000207 








RTS 


17 






1279 












SPACES 








1280 


006120 


012702 


006132 

Www 1 




SP3- 

WT ^ • 


NOV 


#SP3A,X2 






1281 


006124 




006766 






JSR 


X7.T0P 






1282 


006130 


000?07 








RTS 


17 






1283 


006132 


0?0057 


07 

wC 




SP3A- 


.ASCII 


;/ /; 






1284 












.EVEN 








1285 




















1286 


006136 


022606 






SCOPES- 

w k wr L w • 


CHP 


(6)*.X6 




.■REPOSITION THE STACK 


1287 


006140 


012637 


177776 

If If r U 






NOV 


(6)*.CC 






1288 


006144 


0001 77 

vvv Iff 


0001 14 

WWW 1 1 "t 






JHP 


aRETURN 




: SCOPE RETURN 


1289 




















1290 










-SCOPE 

0 w V wr b 


OR/AND ITERATION LOOP FOR 


EACH 


TEST 


1291 


006150 


03P777 

w f f f 


040000 

w"f wwww 


1 72666 


SCOPFC • 

iJ V Wr b V • 


BIT 


«40000,aSR 




;TEST SR FOR SCOPE 


1292 


006156 


001367 








BNE 


SCOPES 




;YES SCOPE 


1293 


006160 


005737 


006252 

WWWb 






TST 


a#X0ftFLG 




1294 


006164 


10001 1 








BPL 


1$ 






1295 


006166 


013746 


000004 

w WW ww~ 






NOV 


a#4,-(X6) 






1296 


006172 


012737 


006254 

V VWfc ^ ~ 


000004 




NOV 


«X0RA,a«4 






1297 


006200 


005737 


177060 






TST 


a#1 77060 






1298 


006204 


012637 


000004 

W W WW Wt 






NOV 


(X6)^.af4 




.-RESTORE STACK 


1299 


006210 


032777 


004000 

W W~ W WW 


1 72626 


IS- 

1 w • 


BIT 


#4000 «asR 




:N0 - TEST FOR ITERATION 


1300 


006216 


001007 








BNE 


SCOPEG 




.'INHIBIT ITERATION 


1301 


006220 


023737 


006250 

W W Ufc ^ w 


001022 




CNP 


SCOPEF. ICOUNT 






1302 


006226 


001403 








BEQ 


SCOPEG 




;EXIT - DONE 


1303 


006230 


005237 


006250 

W W Vb ^ w 






INC 


SCOPEF 




.-INCRENENT COUNT 


1304 


006234 


000740 








BR 


SCOPEB 




.-LOOP SONE MORE 


1305 


006236 


005037 


006250 

WwWb ^ W 




SCOPEG- 

w V wr b u • 


CLR 


SCOPEF 




.-CLEAR COUNT 


1306 


006242 


01 1637 


006264 

W VWb w^ 






NOV 


aX6,RETURN 




.-SAVE SCOPE RETURN POINTER 


1307 


006246 


000002 








RTI 






.-RETURN INLINE-NEXT TEST 


1308 


006250 


oocooo 

W WW WW V 






SCOPEF : 


0 






; COUNT LOCATION FOR INTERATION LOOP 


1309 


006252 


000000 

W WW WW w 






X0RFL6: 


0 








1310 


006254 


022626 






XORA: 


CNP 


(X6)+,(X6)* 






1311 


006256 


012637 

W 1 b w-/ 1 


000004 

WW WW w~ 






NOV 


(X6)*,af4 






1312 


006262 


000725 








BR 


SCOPEB 






1311 


006264 


001 1 50 

WW 1 i ^ w 






RETURN: 


BEGIN 






.-ADDRESS OF LAST TEST 


1314 










:NOV ADDRESS OF 


NESSAGE TQ REGISTER 2 




1315 










.•THEN JSR X7.T0P 






1316 


006266 


142777 


000177 


172520 


TOP: 


BICB 


#177, aTCSR 




;CLR INT FLAG 


1317 


006274 


112237 


006366 






HOVB 


(2)*,E0NIC 




;NOVE IN EON NARKER 


1318 


006300 


121237 


006366 




TOPI: 


CNPB 


aX2.E0NK 




;CONPARE FOR EON 


1319 


006304 


001001 








BNE 


.♦4 




;N0 • 


1320 


006306 


000207 








RTS 


X7 




;YES. EXIT 


1321 


006310 


121227 


000100 






CNPB 


ax2,#'a 







CZKWBJO KWn-P RT CLK TST 



HACYII 30A(1052) 19-APR-78 09 



N 

;58 



2 

PAGE 



26 



ZKUBJ . 


Pll 


l9>APR-78 


09:55 






SUBROUTINES 


1322 


006314 


001406 








BEQ 


T0P2 


1323 


006316 


105777 


172472 






TSTB 


aTCSR 


1324 


006322 


100375 








BPL 


.-4 


1325 


006324 


112277 


172462 






novB 


(2)+.aTDBR 


1326 


006330 


000763 








BR 


TOPI 


1327 


006332 


105777 


172456 




T0P2: 


TSTB 


aTCSR 


1328 


006336 


100375 








BPL 


.-4 


1329 


006340 


112777 


000215 


172444 




MOVB 


#215,aTDBR 


1330 


006346 


105777 


172442 






TSTB 


aTCSR 


1331 « 


006352 


100375 








BPL 


.-4 


1332 


006354 


112777 


000212 


172430 




NOVB 


#212.aTDBR 


1333 


006362 


005202 








INC 


X2 


133A 


006364 


000745 








BR 


TOPI 


1335 


006366 


000 






EOHK: 


• BYTE 


0 


1336 




006370 








.EVEN 




1337 


006370 


040057 


020040 


041520 


nSGI : 


.ASCII 


; /a PC 


1338 


006376 


020040 


020040 


052123 








1339 


006404 


052101 


051525 


020040 








1340 


006412 


047503 


047125 


042524 








13A1 


006420 


020122 


052040 


046505 








1342 


006426 


040120 


057 










1343 




006432 








.EVEN 




1344 


006432 


04C057 


057 




NSG2: 


.ASCII 


•J ml: 


1345 




006436 








.EVEN 




1346 


006436 


040057 


055103 


053513 


nS63: 


.ASCII 


;/aCZKWBJ 


1347 


006444 


045102 


0454 '»0 


030527 








1348 


006452 


026461 


020120 


052122 








1349 


006460 


04U40 


045514 


052040 








1350 


006466 


052123 


027500 










1351 












.EVEN 




1352 


006472 


040057 


042522 


052123 


NS6PUR: .ASCII 


; /aRESTART 


1353 


006500 


051101 


044524 


043516 








1354 


006506 


04044)) 


052106 


051105 








1355 


006514 


040440 


050040 


053517 








1356 


006522 


051105 


043040 


044501 








1357 


006530 


052514 


042522 


040100 








1358 


006536 


057 












1359 




006540 








.EVEN 




1360 


006540 


040057 


047531 


020125 


XORN. 


.ASCII 


;/aYOU ARE 


1361 


006546 


051101 


020105 


047117 








1362 


006554 


040440 


020116 


047530 








1363 


006562 


020122 


042524 


052123 








1364 


006570 


051105 


027500 










1365 












.EVEN 




1366 










; TIMER FOR KWII 


-P CLOCK 


1367 
















1368 


006574 


172562 






CSBl 


172562 




1369 


006576 


172560 






CSRl 


172560 




1370 


006600 


172564 






CTRl 


172564 




1371 


006602 


000504 






CfCVl 


504 




1372 


006604 


000506 






CKVS1 : 506 




1373 


006606 


000000 






CKFL6: 0 




1374 


006610 


0000*^0 






INTFLG: 0 




1375 


006612 


177566 






POBR 


• 177566 




1376 


006614 


177564 






PCSR 


■ 177564 




1377 


006616 


000064 






PVEC 


■ 64 





SEO 0026 



CK TTV 

WAIT FOR DONE 
MOVE CHARACTER 
BRANCH BACK 



.•SEND CARRIAGE RETURN 



SEND LINE FEED 

INCRMTN R2 

NO EOn, SO LOOP 



STATUS COUNTER TEHPi/; 



A POWER FAILUREaa/; 



CZKWBJO KW11-P RT CLK TST 
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3 
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SEO 0027 



1378 


006620 


000066 






PVECS: 66 








1579 


006622 


177562 






KDBR: 


177562 








1380 


006624 


177560 






KCSR: 


177560 








1381 


006626 


000060 






KVEC: 


60 








1382 


006630 


000062 






KVECS: 62 








1383 


006632 


000000 






CNT: 


0 








138A 


006634 


000000 






CNT1: 


0 








1385 


006636 


000000 






CNTB: 


0 








1586 




000211 






CTRL] 


=211 








1387 




000224 






CTRLT=224 








1388 


006640 


177776 






PSl': 


177776 








1389 


006642 


M A M A A A 

000000 






HRdI: 


0 








1390 


006644 


A A A A A A 

000000 






HRS2: 


0 








1391 


006646 


A A A A A A 

000000 






MINI: 


0 








1392 


006650 


A A A A A A 

000000 






NIN2. 


0 








1393 


006652 


M M A A A A 

000000 






SEC1. 


0 








139A 


006654 


A A A A A A 

000000 






SEC2. 


0 








1395 


006656 


A A A A A A 

000000 






LST: 


0 








1396 


006660 


A A A A A A 

000000 






HST: 


0 








1397 


006662 


A A A A A A 

000000 






HRS1A: 0 








1398 


006664 


A A A A A A 

000000 






HRS2A: 0 








1399 


006666 


AAA AAA 

000000 






NIN1A: 0 








UOO 


006670 


A A A A A 

000000 






niN2A: 0 








U01 


006672 


M A A A A A 

000000 






SEC1A: 0 








1A02 


006674 


A A A A A A 

000000 






SEC2A: 0 








U03 


006676 


A A A A A A 

000000 






LSTA 


0 








UOA 


006700 


A A A A A A 

000000 






NSTA 


0 








U05 


006702 


M M A A A A 

000000 






rnPSUR: 0 






• TcHP 


U06 


006704 


AAA 

000 






BYT1 


.BYTE 


u 




*LOC 1 


1A07 


006705 


AAA 

000 






BYT2 


.BYTE 


A 

0 




• ■ 


1408 


AA^ ^f^A 

006706 


AAA 

000 






BYT3 


.BYTE 


A 
U 






K09 


A A^ *v A "y 

006707 


AAA 

000 






BYT4 


.BYTE 


A 
U 






1A10 


A A i T 1 t\ 

006710 


AAA 

000 






BYT5 


.BYTE 


A 
U 






1411 


006711 


AAA 

000 






BYT6 


.BYTE 


U 




> ** 


1A12 


A Ay ^ 4 ^ 

006712 


AAA 

000 






BYT7 


.BYTE 


0 




• t 


U13 




AA^ 94 / 

006714 






.EVEN 








U1A 




















U15 




















1416 




















1417 










K100HZ: nOV 








1418 


006714 


A4 ^ 9 A y 

012706 


A A A 9 7^ 

000776 






fBUFf ,X6 




1419 


A A y A 

006720 


A A / *TT 9 

004737 


At 4 Z C ^ 

011652 






JSR 




X7.SVADJ 




1420 


A A y i 

006724 


005077 


4 9*994 A 

177710 






CLR 




apsu 




1421 


AA^ ^ #A 

006730 


012737 


A A A A A A 

000000 


AA7£ 7/ 

007674 




ftOV 




#0.CLK+2 
f* 31. CLK 




1422 


006736 


A* 0"7 * 7 

012737 


AAA4 

000131 


AA77A^ 

007702 




mv 






1423 


006744 


A4 17AA 

012700 


A 4 /\yCA 

010356 






NOV 




fTABL.XO 




1424 


006750 


A4 I^AI 

012701 


A4 A 

010376 






MOV 




#TABL1,X1 


1425 


006754 


004537 


007Z5h 






JSR 




XS.atNOVE 


1426 


A A^ ^A A 

006760 


012737 


000Q43 


Al ACA^ 

010506 




NOV 




#35.,CLK3*2 




AAA 7XiL 


A1 9777 


AA1 517 






NOV 




#655..CLIC4*2 


1428 


006774 


000137 


007250 






JNP 




8*INIT 




1429 




















1430 


007000 


012706 


000776 




K10HZ: nOV 




#BUFF,X6 




1431 


007004 


004737 


011652 






JSR 




X7,SUADJ 




1432 


007010 


005077 


177624 






CLR 




apsu 




1433 


007014 


012737 


164217 


007674 




NOV 




#-15561. CLK+2 



2N0 '• 
3R0 " 
4TH " 
5TH •' 
6TH " 
7TH 



;HAS THIS CPU HAVE A SUITCH REG.? 
•lOOKHZ 



; LEAST VALUE 
:HOST VALUE 



:HAS THIS CPU HAVE A SUITCH REG.? 

« 

•lOKHZ 



CZKWBJO KU11-P RT CLK TST 
CZKWBJ.P11 19-APR-78 09:55 

U3A 007022 012737 000133 

1A35 007030 012700 0103S6 

K36 00703A 012701 010A16 

U37 0070AO 00A537 007234 

H38 00704<. 012737 000000 



HACY11 30A(1052) 19-APR-78 09:58 
SUBROUTINES 

007702 HOV #133.CLK1*2 

nOV #TABL,XO 
nOV #TABL2,X1 

jsR x5.a#novE 

010506 HOV #0..CLK3*2 



SEQ 0028 



D 3 

CZKyBJO KU11-P RT CLK TST HACYll 30A(1052) 19-APR-78 09-.58 PAGE 29 

CZKWBJ.P11 19-APR-78 09:55 SUBROUTINES SEO 0029 

K39 007052 012737 001130 010536 HOV #600. . CLIC4 + 2 

U^O 007060 000137 007250 JHP iflNIT 



CZKUBJO Kwn- 
CZKUBJ.PIl 



P RT CLIC TST MACV11 
19-APR-78 09:55 



UA1 
U4A 



00706A 012706 000776 
007070 00^737 011652 
00707A 005077 1775A0 



30A(1052) 19-APR-78 
SUBROUTINES 



E 3 
09:58 PAGE 



H60Z: 



MOV 
JSR 
CLR 



#BUFF.X6 
X7,SUA0J 

apsu 



30 



SEQ 0030 



;HAS THIS CPU HAVE A SWITCH REG.? 



F 5 

CZKWBJO KU11-P RT CLK TST HACY11 30A(1052) 19-APR-78 09:58 PAGE 31 

CZKUBJ.P11 19-APR-78 09:55 SUBROUTINES SEQ 0031 

UA5 007100 012737 177733 0076('4 MOV #-A5,CLK»2 ;60HZ 



G 3 

CZKWBJO <U11-P RT CLIC TST MACVll 30A(1052) 19-APR-78 09:58 PAGE 32 

CZKUBJ.PII 19-APR-78 09:55 SUBROUTINES SEQ 0032 

UA6 007106 012737 000135 007702 MOV #135.CLICl+2 



CZKWdJO 


KUl 1 -F 


RT CLK TST 


■■ A r vi 1 

RAC I 1 1 


7Ak / 1 ACO 

30A\ IU3c 


19- 


H 3 

APR-78 09:58 PAGE 


77 

33 




CZKUBJ. 


P11 


I9-APR-78 


Ar* c c 

09: 55 






SUBROUTINES 




SEO 0053 


U47 


007114 


01 2700 


A 4 A V r Z 

010556 






HOV 


ii T A D 1 V A 






U48 


007120 


012701 


010436 






nov 


#TABL3,X1 






U49 


00/124 


004537 


007234 






JSR 


Z5,a#M0VE 






1450 


0071 30 


012737 


A A A A A A 

000000 


010506 




nov 


#00,CLK3t2 






1451 


QOfi 5b 


012737 


AAI i TA 

001 150 


AI AC7A 

01053O 




MOV 


«600.«CLK4*2 






1452 


007144 


000137 


AA^ ^ C A 

007250 






J MP 


aflNIT 






1455 
1454 


007150 


012706 


AA A77Z. 

000/76 




H50Z: 


nov 


#6UFF,X6 






1455 


007154 


A A/ TT 7 

004757 


AI i C 1 

011652 






JSR 


X7.SyA0J 


.-HAS 


THIS CPU HAVE A SWITCH REG.? 


1456 


007160 


AAC 


1 / /454 






CLR 


apsw 






1457 


007164 


Ai TTl"* 

01275/ 


i 777/ T 


007674 




nov 


#-36,CLK*2 




;50HZ 


1458 


007172 


012757 


A AAI T C 

000 1 55 


007702 




NOV 


#135,CLKU2 






1459 


007200 


01 2/00 


A1 t\tCi, 

01 0556 






nOw 


ilT AOl VA 

f TAbL ,*0 






1460 


007204 


012701 


010456 






NOV 


«TABL4,X1 






1461 


007210 


004537 


007234 






JSR 


X5,a#N0VE 






1462 


007214 




AAAAAA 
000000 


010506 




NOV 


#0..CLK3*2 






1 L/iX 
1 *»Oj 




AI 077^ 


AAI i A/ 
001104 


AI ACTA 
U 1 0530 




NOV 


«S80.,CLK4*2 






1464 


007230 


AAAi 77 
0001 


AA70CA 

0U/c50 






J HP 


aflNIT 






1465 
1466 


007234 


Ai 


1 77771 




HOVE: 


NOV 


#-7.X2 






1467 


007240 


012120 






IS: 


NOV 


(ll)*.(XO)* 






1468 


007242 


AAC OAO 








INC 


12 






1469 


007244 


AAi 77^ 








BNE 


1$ 






1470 


007246 


OOOcU) 








RTS 


IS 






1471 




















1472 


007250 


01 3/jf 


AACC70 

0055ft 


000024 


INIT: 


NOV 


PURF1,24 




• 


1473 


007256 


AI 0 7AiL 


AAA77iL 
000/ /O 






NOV 


«BUFF,X6 




;1NITIALIZE 


1474 


007262 


AAC A77 

005057 


0066)6 






CLR 


aiLST 




■ 


1475 


007266 


AACA77 
00503/ 


AAil/liLA 

OOoooO 






CLR 


afNST 






1476 


007272 


AI 5777 


AAAAilA 

OOOOoO 


006642 




NOV 


f60,afHRS1 






1477 


007300 


AI 0777 


AAAA/LA 

uOOOoO 


006644 




NOV 


f60,a#HRS2 






U78 


007306 


ni 0777 


AAAAAA 

OOOOoO 


006646 




NOV 


f60,afNltt1 






1479 


00731 A 


AI 0777 


AAAAAA 

OOOOoO 


006650 




NOV 


f60,afNIN2 






1480 


007322 


A1 0777 


AAAAiLA 

OOOOoO 


006652 




NOV 


#60.a#SEC1 






1481 


007330 


AI 0777 


AAAAAA 
000060 


006654 




NOV 


#60.afSEC2 






1482 


007336 


AI 0777 


AI l\L 7A 
OIOh /O 


171442 




NOV 


fCLKI.aCKV 






1483 


007344 


AI 0777 
Vict f f 


AAA7/.A 

000j*»0 


171436 




NOV 


#340, acm 






1484 


007352 


AI 0777 


AA7<An 

00/5o0 


177246 




NOV 


fKlNTR.aKVEC 






1485 


007360 


AI 0777 
OlCf f f 


A/tAOAA 

OOOcOO 


177242 




NOV 


fZOO.aKVEcs 






1486 


007366 


AI 0777 


AAAOAA 
OOOOOO 


177224 




NOV 


#200,aPVECS 






U87 


007374 


AI 0777 


AAA1 AA 

000100 


177222 




NOV 


flOCaKCSR 






U88 


007402 


AACA77 


AAAAAA 

OOooOo 






CLR 


atCLKFLG 






1489 


007406 


AACA77 
00503/ 


AAAA1 A 
OOoo 1 U 






CLR 


a#INTFLG 






1490 


007412 


AA<rt77 

0050/ / 


1 71 7A0 

1/1 J0£ 




START: 


CLR 


acsR 






1491 


007416 


AACA77 
0050/ / 


1 71 7AA 

1 /I 300 






CLR 


acsB 






1492 


007422 


A70777 


AAAAAO 
000002 


171414 


WAITA: 


BIT 


«2,8SR 




;UAIT LOOP. SU 1 CAUSE WAIT 


1493 


007430 


AAI AAI 

001 hOI 








BEQ 


CLKON 




1494 


007432 


AAA AAI 
000001 






UAITB: 


UAIT 








1495 


007434 


A70777 


AAAAA1 
000001 


171402 


CLKOn. 


BIT 


fi.asR 




:SU 0 TURNS ON CLK2 


1496 


007442 


nm A70 
001 Oj£ 








BNE 


3S 






1497 


007444 


A70777 


AAAAAA 
OOOOUh 


171372 




BIT 


#4.aSR 




:SU 2 DETERNINES PRESENCE OF CLOCK 2 


1498 


007452 


001426 








BEQ 


3$ 






1499 


007454 


005737 


006606 






TST 


afCLKFLG 




:CLKFLG ALLOW CLK 2 TO BE TURNED ON 


1500 


007460 


AAI 7£A 

001560 








BNE 


VAITA 




.•ONLY ONCE 


1501 


007462 


005077 


177106 






CLR 


acsBi 






1502 


007466 


012777 


007762 


177106 




NOV 


#K0UT,aCKV1 







C2KWBJ0 KUll-P PT CLK TST MACYV 30A(1052) 19 

CZKWBJ.P11 19-APR-78 09:55 SUBRi 

1503 O07«7A 012777 000200 177102 MOV 

150A 007502 012737 177777 006606 HOV 

1505 007510 012777 U1521 177056 MOV 

1506 007516 012777 000113 177052 MOV 

1507 007524 000137 007432 JHP 

1508 007530 005037 006606 3$: CLR 
d09 007534 032777 000004 171302 BIT 

1510 007542 001404 BEQ 

1511 007544 005077 177026 CLR 

1512 007550 005077 177020 CLR 

1513 007554 000137 007422 4$: JHP 
1514 

1515 007560 017701 1/7036 KINTR: MOV 

1516 007564 042701 177600 SIC 

1517 007570 022701 000007 CMP 

1518 007574 001557 BEQ 

1519 007576 022701 000011 CMP 

1520 007602 001404 BEQ 

1521 007604 022701 000024 CMP 

1522 007610 001464 BEQ 

1523 007612 000002 RTI 
1524 

1525 

1526 007614 005077 171160 KIN: CLR 

1527 007620 005C77 171156 CLR 

1528 007624 012737 177772 006632 MOV 

1529 007632 012737 006642 006634 MOV 

1530 007640 005037 006656 CLR 

1531 007644 005037 006660 CLR 

1532 007650 012777 007710 176750 MOV 

1533 007656 000002 RTI 
1534 

1535 007660 012777 007560 176740 KIN12: MOV 

1536 007666 017701 176730 MOV 

1537 007672 012777 000000 171102 CLK: MOV 

1538 007700 012777 000131 171072 CLKI: MOV 

1539 007706 000002 RTI 
1540 

1541 007710 013704 006634 KINI: MOV 

1542 007714 017701 176702 MOV 

1543 007720 042701 000300 BIC 

1544 007724 010124 MOV 

1545 007726 010437 006634 MOV 

1546 007732 005237 006632 INC 

1547 007736 001003 BNE 

1548 007740 012777 007660 176660 MOV 

1549 007746 000002 IS: RTI 
1550 

1551 007750 017737 176646 007760 HOLDIT: MOV 

1552 007756 000002 RTI 
1553 

1554 007760 000000 HOLD: 0 

1555 

1556 007762 005037 006610 KOUT: CLR 

1557 007766 012777 007750 176632 MOV 

1558 007774 012700 006642 MOV 



■APR-78 
)UTINES 



I 3 
09:58 PAGE 



34 



#200,aCKVS1 

#-1,a#CLICFLG 

#141521 ,8CSB1 

#113.aCSR1 

UAITB 

atCLKFLG 

#4,aSR 

4S 

aCSRi 

acsBi 

UAITA 

aiCDBR.XI 
#177600^X1 
#7, XI 
CNGSWR 
#11. XI 
KIN 
#24, XI 
KOUT 



SEO 0034 



;TURN ON CLK 2 

.•CLEAR CLK 2 IF PRESENT 



.•KEYBOARD INTERRUPT HANDLER 

.•STRIP JUNK 
;IS CHAR A 6(C0NTR0L-G}? 
:IF YES. GO TO CNGSWR 
;IS IT A CNTRL I ? 

;IS IT A CNTRL T ? 



acsR 
acsB 

#-6.a#CNT 
#HRSl«a#CNT1 

LST 
MST 

*KlNI.aKVEC 



.•HANDLER FOR CTRL I 
.•SETUP TIME OF DAY 

.-INPUT 



#KINTR.aKVEC 

axDBR.xi 

«o,acs8 

fisuacsR 



.-AUAIT A CHAR TO START 
;CLK 1 



arCNTl«X4 

aKOBR.H 

#300. XI 

XI. (X4)* 

X4.a#CNT 

a#CNT 

IS 

#KlNl2.aKVEC 



.STORE TIME U? DAY 



aKDBR.a#HOLD 



:OUHNY INTERRUPT SERVICE ROUTINE 



a#INTFLC 

#HOLDIT.aKVEC 

#HRS1.X0 



.'INPUT HANDLER FOR CTRL T 
;SET DUMMY VECTOR 
;GET TIME OF DAY INTO 



CZICUBJO 




RT CLK TST 


HACYI 1 


30A{1052) 19- 


J 3 

APR-78 09:58 PAGE 








CZKUBJ. 


PI 1 


19-APR-78 


09:55 






SUBROUTINES 








1559 


010000 


012703 


006662 






nov 


#HRS1A,X3 


;WORK AREA 






1560 


010004 


012704 


177770 






nov 


1-10, X4 








1561 


010010 


012023 






1$: 


MOV 


(X0)*.(X3)» 








1562 


010012 


005204 








INC 


X4 








1563 


OlOOU 


001375 








BNE 


IS 








1564 


010016 


017701 


170762 






MOV 


aCTR.Xl 








1565 


010022 


005737 


006610 






TST 


SIINTFLG 


;SEE IF CLK HAS INTERRUPTED IN 


1566 


010026 


001355 








BNE 


KOUT 


rCALC VALUE OF CTR 




1567 


010030 


005737 


007674 






TST 


a#CLK^2 




A 1 


IViUKHZ : 


1568 


010034 


001416 








BEQ 


2S 








1569 


010036 


163701 


AA 7 / 

007674 






SUB 


aiCLK«2,Xl 


> CIIR f M 1 T VAi IIP 






1570 


010042 


006301 








ASL 


:i 








1571 


010044 


006301 








ASL 


XI 








1572 


010046 


023727 


AA7Z T/ 

007674 


164217 




CMP 


a#CLK*2, #-13561 


•id vLUL^ nuNnirau 


A 1 




1573 


010054 


001405 








BEQ 


3S 








157A 


010056 


000301 






4 A* 

10S: 


SWAB 


XI 








1575 


010060 


023727 


A A ^ / 

007674 


177742 




CMP 


a#CLK*2,#-36 


(id LLULK nuiwviivu 


AT 




1576 


010066 


001001 








BNE 


2S 








1577 


010070 


AA^ 7A1 

006301 






3>: 


ASL 


XI 








1578 


010072 


A A f AAA 

005000 






2S: 


CLR 


xo 








1579 


010074 


005003 








CLR 


X3 








1580 


010076 


A4 ^ 7A / 

012704 


A4 A7C ^ 

010356 




5S : 


MOV 


«TABL.X4 








1581 


010102 


A AC9A 4 

005701 






6S: 


TST 


XI 








1582 


010104 


100001 








BPL 


4S 








1583 


010106 


A^ 4 1 AT 

061403 








ADD 


aX4,X3 








158A 


010110 


AA^ TA4 

006301 






49 : 


ASL 


XI 








1585 


010112 


A Ar y 

005724 








TST 


(X4)» 








1586 


010114 


A A C ^ AA 

005200 








INC 


xo 








1587 


010116 


A^ ^ '7AA 

022700 


AAAAA7 

000007 






CMP 


#7.X0 








1588 


010122 


AA't 7 

001367 








BNE 


6S 








1589 


010124 


A^ ATT7 

060337 


AA^ 7AA 

006700 






ADO 


X3,a#MSTA 


:AOD VALUE OF CTR 


TO 


Hd 1 


1590 


010130 


AAA4 

0001 37 


Ai A771 

010772 






J MP 


a#CLK2 








1591 


010134 








CNGSUR: 












1592 


010134 


010246 








MOV 


X2.-(6) .SAVE fi2 






1593 


010136 


A1 AT/ 

010346 








MOV 


X3,-<6) .SAVE R3 






159« 


010140 








SETBtT: 












1595 


010140 


AAC AT"7 

005037 


006702 






CLR 


TMPStfR 


CLEAR TEMP SUR 






1596 


010144 


AAC AAT 

005003 








CLR 


X3 


■CLEAR R3 






1597 


010146 


AA/ 

00^ O ( 


A1 AT^/ 

010324 






JSR 


PC.CRLF 


•PRINT <CR><LF> 






1598 


010152 


A4 ^7A1 

012702 


AA^ 7Ay 

006704 






MOV 


#BYT1.I2 


•INIT R2 TO 1ST BYTE LOC 






1599 


01 01 56 








CKCSR: 












1600 


010156 


4 AC 

105777 


t 7^ t i 






TSTB 


aKCSR ;IS CHAR TYPED? 






1601 


010162 


4 AA7 7C 

100375 








BPL 


CKCSR ;1F NOT.yAIT 






1602 


010164 


01 ^^01 


i 7^ / T ^ 






MOV 


aKOBR.Xl .ELSE MOVE THE CHAR TO R1 






1603 


010170 


042701 


1 rr600 






BIC 


#177600. XI ; STRIP JUNK 






160A 


010174 








5>: 












1605 


010174 


105777 


1 7641* 






TSTB 


aPcsR 








1606 


010200 


100375 








BPL 


5S 








1607 


010202 


A4 77 

0l0l77 


1 7^ / A/ 

' r6404 






MOV 


XI .aPOBR 








1608 


010206 


IZc/^Oi 


AAAA^C 

000025 






CHPB 


#25. XI 


•IS CHAR U (CONTROL-U)? 






1609 


010212 


AA4 7C ^ 








BEQ 


SETBYl 


;IF YtS. START OVER 






1610 


010214 


122701 


000015 






CMPB 


#15, X1 


■ELSE IS IT <CR>? 






1611 


010220 


001412 








BEQ 


SUDONE 


•IF EQUAL. GO TO SWDONE 






1612 


010222 


122701 


000012 






CHPB 


#12. XI 


•IS IT <LF>? 






1613 


010226 


001407 








BEQ 


SWOONE 


■IF EQUAL, GO TO SWDONE 






16U 


010230 


005203 








INC 


X3 


; INDICATE A CHAR INPUTTED 







SEO 0035 



CZKUBJO KU11-P RT CLK TST 
CZKUBJ.P11 19-APR-78 09-.55 



HACY11 30A(1052) 19-APR-78 
SUBROUTINES 



K 3 
09:58 PAGE 36 



SEO 0036 



1615 


010232 


042701 


1 77770 






BIC 


1616 


010236 


4 4 A 4 O T 

1 10122 








BuvB 


1617 


010240 


022702 


AAy 74 T 

006712 






CUP 


1618 


01024A 


AA4 ^ i i 

001 344 








Due 

BNc 


1619 


010246 








SUDONc : 




1620 


010246 


005703 








T C T 

TST 


1621 


010250 


AA4 / TA 

001420 








DC A 

BcQ 




010252 


A i T 7A T 

012703 


AAX 7Ay 

006/04 






MAW 

nUV 


1623 


A 4 A C ^ 

010256 








i A< . 

10*: 




162A 


A 4 A C Z 

010256 


152337 


AAA 7 AO 

006/02 






D 1 C D 


1625 


A4 A1Z 

010262 


ATAT AT 

020302 








CnP 


1626 


Ai ATA y 

010264 


AA1 y A7 

001 40r 








D c n 
Bcu 


1627 


A1 ATZ. 

010266 


AA^ i 7 7 

0061 3 f 


AAA7AO 

006/02 






DAI 

KOL 


16?B 


A4 A'%71 

01027Z 


AAA 177 

006137 


AAA 7AO 
006/02 






DAI 

KOL 




010276 


AAA i 7 7 
0061 3f 


AAA7AO 
006/02 






DAI 

KUL 


1630 


Ai AT AT 

010302 


AAA7A C 

COO r 63 








DD 
DK 


1 Ti 

lo5 1 


Ai ATAy 








2U» : 






Ai A7Ay 


Ai 7777 

013/ f f 


000/ 02 


1 /U3 32 




nuv 


1633 


A1 AT1 O 








JV9 : 




1634 


A^ ATI ^ 


Ai ^A A7 

01 2603 








nuv 


1635 


A-1 A7i / 

010314 


A i OA AO 








HAU 

nuv 


1636 


A1 ATI A 
010316 


AAy 777 

004 r 3r 


AI A7 0/ 

01032h 






1 CD 
J an 


1637 


010322 


AAAAAO 

000002 








OT t 

nil 


1638 














1639 


Al ATI/ 

010324 








CRLF : 




1640 


A1 ATOy 

01 03<:4 


1 AC 7 77 


1 7AOAy 

1 /626h 






T C TD 


1641 


Ai A7TA 

010330 


i AA77C 

1003/3 








DDI 

orL 


16s2 


Ai Alio 

01033£ 


Ai 0777 
\1\C( f ( 


AAA01 C 

00021 J 


1/6232 




nuv 




Ai ATy A 

0103^0 








1 AC • 
IU»: 






Ai ATy A 

010340 


1 AC777 
1 05/ f / 


1 /0230 






T C TO 




Ai r\XLL 

01 03*»*» 


1 003/ > 








QDI 
OrL 


10^0 


rti A » AA 


AI 0777 


AAAOi O 

UOUc Ic 


1 /OcjO 




nuv 


lOHl 


0 i033h 


AAAOA7 








DTC 


lOMO 
















01U33O 


AAACi A 
1 U 








jcO, 




Ai ATArt 


AAAO/y 








1 0*» • 


1651 


AI ATAO 

0103OC 


AAA1 00 
0001 CC 








A9 

oe« 


IOjc 


Ai ATAy 


AAAACI 
000031 








AI 


1 ACT 


Ai ATAA 

U1U300 


AAAAOy. 










1 AC/ 


0l03f 0 


OOUOl C 








1 n 


1655 


AI t\XTi 


AAAAAC 

OOOOUj 








c 

3. 


1050 


Ai ATTy 

01 03/ H 


AAAAA7 
000003 








7 

3 . 


















Ai A17A 

0103^6 


00031 0 






T ADI 1 • 


T3ft 
320. 


1 ACQ 


Ai l\Lt\t\ 


AAAOyy 
UUOc*l*t 








1 01 • 


1 AAA 


Ai Ay A^ 

OlOAOc 


AAA1 OO 
0001^2 








B3 
02 • 


lool 


A* A/ Ay. 


AAAAC1 

00003 1 








H 1 . 




AinzAA 

UlU^iUO 


A AAA OA 










loo J 


Ai Ay i A 


nnnni o 










1AAA 
IOO*» 


M 1 Vt 1 C 


ononns 

VvvvvJ 








c 

y • 


1665 


010414 


000003 








3. 


1666 














1667 


010416 


000632 






TABL2: 


410. 


1668 


010420 


000315 








205. 


1669 


010422 


0001 4j6 








102. 


1670 


010424 


000063 








51. 



#177770.11 

:i.(2)* 

#BYT7,12 
CKCSR 

X3 
30$ 

#BYT1.X3 

(3)<-,THPSUR 

t3.X2 

20$ 

TMPSUR 
TNPSUR 
TNPSUR 
10$ 

TNPSUR. aSR 

(6)+.X3 
(6)*.X2 
PC.CRLF 



aPCSR 
CRLF 

f215,aPDBR 

iPCSR 
10$ 

«212.aP0BR 
PC 



LEAVE ONLY BINARY » IN Rl 

MOVE M TO PROPER BYTE LOC 

IS R2 PAST BYT6 ADDR? 

IF NOT, GO BACK FOR ANOTHER CHAR 

WAS A CHAR TYPED? 
IF NOT, EXIT 

INIT R3 TO 1ST BYTE ADDR 

SET LOW 3 BITS OF TMPSWR 

IS R3 EQUAL BYTE ADDR IN R2? 

IF YES .EXIT 

ELSE 

SHIFT 

NEXT 3 BITS UP 

AND GO GET ANOTHER « 

;SET UP NEW SWR 

RESTORE R3 
RESTORE R2 
PRINT <CR><LF> 



IS TTY READY? 
IF NOT, WAIT 
ELSE TYPE <CR> 

IS TTY READY? 
IF NOT .WAIT 
ELSE TYPE <LF> 



.•TABLE FOR WORK AREA 



;100KHZ TIME TABLE 



;10KH2 TIME TABLE 



CZKUBJO KW11-P RT CLK TST 



HACY11 30A(1052) 19-APR-78 



L 

09:58 



3 

PAGE 37 



ZKUBJ. 


P11 


19-APR-78 


09:55 






SUBROUTINES 






16.71 


010426 


000032 








CO • 








1672 


010430 


000015 








1 •» 
1 J > 








1673 


010432 


000006 








o • 








1674 


010434 


000003 








1 

J • 








1675 




















1676 


010436 


001025 






TABL3 


J J J ■ 




;60HZ 


TIME TABLE 


1677 


010440 


000415 








?67 








1678 


010442 


000205 








1 

1 J J • 








1679 


010444 


000103 








Or. 








1680 


010446 


000041 
















1681 


010450 


000021 








1 7 

1 r • 








1682 


010452 


000000 
















1683 


010454 


000000 
















1684 




















1685 


010456 


000500 






TA8L4 






;50HZ 


TIME TABLE 


1686 


010460 


000240 








160 








1687 


010462 


000120 








AO 








1688 


010464 


000050 
















1689 


010466 


000024 








PO 








1690 


010470 


000000 








0 

V • 








1691 


010472 


000000 








0 








1692 


010474 


000000 
















1693 




















1694 










.•THIS 


pnilT IMF 


KFFPC TMF 74 HOUR 






1695 










;TIH£ 


OF bAY 








1696 




















1697 


010476 


012737 


•[71777 


006610 


CLKI: 


MOU 


w It mw 1 If 1 r L V 


.-CLOCK INTERRUPT SERVICE 


1698 


010504 


062737 


000044 


006656 


CLIC3: 


ADD 


M\f% ail ST 


:ADD 


LSe TO LST 


1699 


010512 


022737 


000144 


006656 




TMP 

^Hr 


1100 afi ST 


:0I0 


IT OVER FLOW 


1700 


010520 


003005 








RGT 

OV I 


ri K4 






1701 


010522 


162737 


000144 


006656 




duo 


flOO aiLST 

W IVV* 


;rES 




1702 


010530 


005237 


006660 






mi* 


aiMST 


.-INC 


HST 


1703 


010534 


062737 


001217 


006660 


CLIC4: 


ADD 


f65S aiHST 


;AOD 


nSB TO MST 


1704 


010542 


022737 


001750 


006660 








:0I0 


IT OVER FLOW 


1705 


010550 


003011 








RfiT 








1706 


010552 


162737 


001750 


006660 




CUR 


#1000 a#HST 


;»ES 




1707 


010560 


005237 


006654 






IMF 


at SFr7 


;INC 


SECOND 


1708 


010564 


022737 


000072 


006654 




TMP 

L rir 




;MAS 


10 SECONDS ELAPSED 


1709 


010572 


001401 








RFO 








1710 


010574 


000002 






2S: 


RT I 
n 1 1 








1711 


010576 


012737 


000060 


006654 




MOW 


fAO atSFT? 


;rES 




1712 


010604 


005237 


006652 










;INC 


nSB OF SECOND 


1713 


010610 


022737 


000066 


006652 




FMP 


f66 afSECI 


:HAS 


60 NIN ELAPSED 


1714 


010616 


001401 








RFO 

DC V 








1715 


010620 


000002 








RT I 








1716 


010622 


012737 


000060 


006652 




MOV 
nu w 




:TES 




1717 


010630 


005237 


006650 






i ffii- 




;1NC 


LSB OF niN 


1718 


010634 


022717 


000072 


006650 




f MP 


• ■ c # ww n inc. 


;HAS 


10 niN ELAPSED 


1719 


010642 


001401 








RFO 


• 






1720 


010644 


000002 








RTI 








1721 


010646 


012737 


000060 


006650 




nov 


i60,a«niN2 






1 722 


010654 


005237 


006646 






INC 


ainiNi 


;INC 


MSB OF niN 


1723 


010660 


022737 


000066 


006646 




CHP 


«66,8iniN1 


;HAS 


60 niN ELAPSED 


1724 


010666 


001401 








BEQ 


.♦4 






1725 


010670 


000002 








RTI 








1726 


010672 


0^27l7 


000060 


006646 




nov 


#60,ainiNi 







SEQ 0037 



CZKUBJO 


KUll-P 


RT CLK TST 


MACY11 


3OA(1052) 


19 


H 3 

-APR-78 09:58 PAGE 38 


CCA nn^A 


CZKUBJ . 


P11 19-APR-78 


09:55 






SUBROUTINES 


1727 


010700 


005237 


006644 






INC 


afHRS2 


• fur 1 CD AC UAIIDC 


1 728 


010704 


022737 


000064 

w w w V/ w ~ 


OOOOH*» 




CUP 


f64,a#HRS2 


, 1 C I CD < / 

, i d L do n *• 


n Tift 

i729 


010712 


001 01 4 








BNE 


NEWTH 




1730 


010714 


022737 




006642 




CUP 


f62.a#HRS1 


;IF YES. IS HSB A 2 


1731 


010722 


001401 








BEQ 


.♦4 




1732 


010724 


000002 








RTl 




;IF 24 HOURS RESET 


1733 


010726 


012737 


000060 

WW WW V 


006642 




HOV 


l60,aiHRS1 


1734 


010734 


012737 


000060 

W V WW w 


000644 




nov 


#60,aiHRS2 


•1 Cf) Akin NCR DP uniiBC 
, DO ANI/ ndo Ur nUUnd 


1735 


010742 


000002 








RTI 




:IF NOT 4 IS IT 10 HOURS 


1 736 


010744 


022737 


000072 


006644 


ftIC 1 ITM ■ 


CHP 


lr2«a#HRS2 


1737 


010752 


001401 








BEQ 


. +4 




1 738 


010754 


000002 








RTI 






1 ?39 


010756 


005237 


006642 






INC 


aiHRSI 


1 ft*0 


010762 


012737 


000060 


OOoo^H 




MOV 


#60,aiHRS2 




1 rsl 


010770 


000002 








RTI 






1742 


















1743 


















1744 


















1745 
1746 


010772 


02273? 


001750 


006700 


CLK2 : 


CMP 


ITOOO. ,a#HSTA 


• Tii f C DAIlTfiJC fC TUC unD^ 

;ini3 NUUIiNt 19 int WUKK 


1747 


011000 


003011 








BGT 


2S 




1748 


011002 


162737 


001750 


006 rUU 




SUB 


M4AAA >%MiB#kVft 

11000. .a#nsTA 


• locA oniiTitiF kut\ rc tuf 

»AnCA nUUIinC nni/ id 1 nC 


1 7/ ft 


011010 


005237 


006674 

w w ■ • 






INC 


at SEC2A 


• CAMP AC IklTPDRIIPT MAMDI FB 


1750 


011014 


022737 


000072 


00o6f 4 




CHP 


#72,8ffSECZA 


• CFBUirF OnilTIUF 


1751 


011022 


001401 








BEQ 


.♦4 




1752 


01 1 024 


000475 








BR 


r ft! A 4 A 

EN01A 




i753 


011026 


01273<' 


000060 


OOOO f 4 




NOV 


#60,ifSEC2A 






011034 


005237 


006672 






INC 


a* SEC1A 




1755 


011040 


022737 


000066 


t\f\i.L.Ti 
\J\jbbfC 




CBP 


f66,af SECT A 




1756 


011046 


001401 








BEQ 


. +4 




1757 


011050 


000463 








BR 


ENOIA 




1758 


011052 


012737 


000060 


OUOO 1 i 




HOV 


f60,af SECIA 




1 f 5t 


011060 


005237 


006670 






INC 


ifHINcA 




1760 


01 1 064 


022737 


000072 


OOOO r U 




CHP 


f72,8fRIN2A 




1761 


011072 


00 ■'401 








BEQ 


.♦4 




4 "7 A. 1 

1762 


011074 


000451 








BR 


P UA 4 ■ 

tNDIA 




1 r o3 


011076 


012737 


000060 


UOOOrO 




HOV 


f60,afHIN2A 




1 r 64 


011104 


005237 


006666 






INC 


A MM V U 4 ft 

afHINI A 




1765 


011110 


022737 


000066 


QOoooo 




CHP 


MM. A AdlMtAl4 A 

f66,ai'HIN1A 




1766 


011116 


001401 








BEQ 


.♦4 




1767 


011120 


000437 








A A 

BR 


P U A 4 A 

END1 A 




1768 


011122 


012737 


000060 


OOoooo 




HOV 


f60,8fHIN1A 




1769 


01 1 1 30 


005237 


006664 






INC 


1 1 A A O A 

HRS2A 




1 770 


01 1 1 34 


022737 


000064 


00OOO4 




CHP 


f64<afHRS2A 




1771 


011142 


001014 








BNE 


NEWT 




1772 


011144 


022737 


000062 


00ODO2 




CHP 


f62/afHRSlA 




1773 


011152 


A A 4 / A 4 

001401 








np A 

BEQ 


.♦4 




IffH 


A 4 4 4 r / 

011154 


AAA e 4 

000421 








n A 

BR 


P kl A 4 A 

ENDIA 




1775 


011156 


012737 


000060 


OUoooc 




HOV 


JI^A AilliAC>4 A 

f60,a#HRSlA 




1 f f O 


011164 


012737 


000060 


OOOOOS 




HOV 


f60,afHRS2A 




1777\ 


011172 


000412 








BR 


ENDIA 




1778 


011174 


022757 


000072 


v0o6O*i 


ftJCLJT • 

Ntwi : 


CHP 


f 72,afHR$2A 




1779 


011202 


001401 








BEQ 


.♦4 




1780 


011204 


000405 








BR 


ENDIA 




7781 


011206 


005237 


006662 






INC 


a#HRS1A 




7782 


011212 


0127Z7 


000060 


006664 




HOV 


«60«a#HRS2A 





CZt^UBJO 


KW11-P 


RT CLK TST 


HACY11 


30A(1052 


1 19- 


N 3 

■APR-78 09:58 PAGE 39 






CZKUBJ . 


P11 




09:55 






SUBROUTINES 




CCA AATO 

ScQ U03V 


1 783 


011220 


012777 


011266 


i 7C T7A 

1 r53rO 


cNDlA: 


nov 


f CR liPVEC 


• CCT IID CAD DDfilTCO AMTDIIT 

> at 1 Ur rUR rKlNIcK UUIrUI 




1 r 


01 1 226 


012737 


177776 


AAZZ. TX 

006636 




nov 


f-2,ifCNTB 






1785 


01 123h 


012737 


006662 


006634 




nov 


f HRS1 A,|#CNT1 






1 f Bo 


011242 


012737 


177767 


006632 




NOV 


f-1 1 ,if CNT 






1 for 


- .1250 


012777 


000000 


1 f 5334 




nov 


fO.iPDBR 






1 r 88 


Ai 1 

011256 


012777 


000100 


1 r5330 




H All 

nov 


flOO.iPCSR 






1789 


on 264 


000002 








n T t 

RTI 








1790 




















1791 




















1 


Ai i 

01 1 266 


012777 


011304 


1 f 5322 




nov 


fLF ,iPVEC 


• nil TP) IT ro 




1 f Vj 


Ai i 17/ 
01 12f4 


012777 


00021 5 


1 f 5310 




nov 


121 5.iPDBR 






1 


Ai i TA*) 

011302 


000002 








RTI 








i 70 c 

1 fyj 




















1 ^96 


AI 1 TA/ 


012777 


011322 


i 7CTA/ 

1 f 5304 


1 c ■ 

LP : 


nov 


f rINTR.iPVEC 


• nilTDIIT 1 C 




1 7ft7 
1 797 


011312 


012777 


000212 


i 7C070 
1 fJCfC 




M All 


f 21 2 .irDBK 






1 798 


Ai i T^A 

011320 


000002 








RTI 








1 f 99 


Ai i TH 

01 1 322 


005237 


006632 




rlN 1 R : 


INC 


if CNT 


;rniNI 1 wo UiUild rULLUWCI/ 




i DAA 
1800 


Ai i TO^ 

01 1 326 


001414 








fk C A 

BEQ 


DONE 


• ov rni DM iikiTii TiMC nc 
;oT lULUN UnliL line Ur 




1 QA1 

1801 


Ai i TTA 

01 1 330 


005737 


006636 






T P T 

TST 


CNIB 






1802 


Ai i TT/ 

01 1 33s 


001420 








BP A 

BEQ 


C AI AU 

COLON 






1 DAT 
1 803 


Ai i TT^ 

011336 


013704 


006634 






nov 


if CNTl ,14 






1 OA/ 

1 80A 


Ai i T/ 1 

01 1 3m2 


012477 


175244 






nov 








1 OAC 

180) 


Ai i T/ ^ 
01 1 3h6 


010437 


006634 






nov 


X4, if CNTl 






1 OA^ 

1 806 


Ai i TCI 

01 1 352 


005237 


006636 






INC 


if CNTB 






1 BA7 

1 OOf 


Ai i TC^ 

01 1 356 


000002 








RTI 








i QAfl 

1oOo 


Ul 1360 


012777 


011414 


1 r 523U 


l\A^C • 

OUNc : 


nov 








1809 


01 1 366 


012777 


000056 


175216 




nov 


fS6,aPDBR 






1810 


Ai i T7/ 

0113rH 


000002 








RTI 








1 81 1 




















1 ol C 


Ai i T7A 

0113^6 


012737 


177776 


AAZATA 
UUOO jO 






f-2 .if CNIB 






1813 


01 1 404 


012777 


000072 


175200 




nOv 


f f 2,irOBR 






IoIh 


01 1412 


000002 








RTI 








i Qi C 

181 D 




















lolo 


Ai i / i y 
01 1414 


005037 


006636 




rtnl 


CLR 


A#r&ITB 

if CNTB 


• DDikiT Hen nt mi i icFr 

,rKllll mo Ur nlLLlSCL 




181 r 


Ai i / OA 

01 1420 


000250 








CLN 








1B1B 


AI i / 

01 1422 


013737 


006700 


006634 




MAII 

nOv 


ifnSTA/if CNTl 






lol 9 


Ai i / TA 

01 143U 


012737 


177767 


UU6032 




MAll 

nuV 


f-V. , if CNT 






1820 


01 1436 


162737 


000144 


006634 




SUB 


f 100, ,ifCNI 1 






l0£l 


AI ^ I J / 

01144H 


100406 








Bnl 


2» 








AI 1 / / ^ 

01 14s6 


005237 


006636 






f tit 
INC 


if CNTB 






1 fi^T 

1023 


011452 


005237 


006632 






f ut 

INC 


if CNT 






1 


AI 1 / 

01 1456 


001367 








BNc 


i • 
1» 






1 flOC 


AI 1 ZAA 

011460 


000404 








BR 


T^ 

3» 






lo2o 


01 1462 


062737 


000144 


ftftXAT/, 
006634 


2»: 


ADO 


tfiAA AiirkiTI 
f 100. (if CNTl 






lc2f 


0114^0 


000250 








CLN 








lo2o 


All/ 70 

01 14r2 


062737 


000060 


006636 


5* J 


ADD 


#ZA a^ruTB 
f60,if CNTB 






1 029 


AI 1 CAA 

01 1 500 


012777 


011516 


1 7Q1 1 ft 

1 /51 10 




MAII 

nov 


f NUni «irVcC 






i OTA 

1830 


Ai i CAZ 

01 1 506 


013777 


006636 


1 fJVfO 




MAll 

nov 


if CNTB,irDBn 






1 ATI 

1831 


Ai i C i / 

01 1 514 


000002 








RTI 








1 AT? 

1032 




















1033 


AI 1 C 1 Z 

01 1 516 


012777 


011600 


1 7?ft70 

1 fjyjfc 


NUni : 


NOV 


fNun2,apvEC 


• DDIkiT 1 CR ftp Mil 1 ICPr 




103^ 


AI 1 

011524 


005037 


006636 






CLR 


B4IAUTB 

if CNTB 






1 BTC 

1835 


AI 1 CTA 

01 1 530 


000250 








CLN 








1836 


011532 


012737 


177767 


006632 




NOV 


#-9.,a#CNT 






1837 


011540 


162737 


000012 


006634 


IS: 


SUB 


f10.,a#CNT1 






1038 


AI 1 C/ 

01 1 546 


100405 








BNI 


3S 







B A 

C2KUBJ0 KU11-P RT CLK TST HACY11 30A{1052) 19-APR-78 09:58 P 

C2KUBJ.P11 19-APR-78 09:55 SUBROUTINES 



1839 


01155C 


005237 


006636 






INC 




1840 


011554 


005237 


006632 






INC 


if CNT 


1841 


011560 


001367 








dNc 


1 9 


1842 


A4 4 f ^ 

011562 


062737 


AAAAZ A 

000060 


006636 


3»: 




f OUfif LNI D 


1843 


A4 4 P'^A 

011570 


A 4 ^ 

01 3777 


AA^ ^ TZ. 

006636 


1 7CA1 / 

1 75014 






if IN f B .arliDK 


1844 


01 1 576 


A AAA A ^ 

000002 








RT 1 




^845 
















1846 


011600 


A4 ^^^^ 

012777 


A A7C Z A 

007560 


1 ^ 5020 


All IH ■ 

NUn2 : 


MOlJ 


f K IN 1 K ,flNVCL 


1847 


011606 


A A AAA *fe 

000002 








n T f 

RTI 




1848 
















1849 
















1350 
















1851 
















1852 
















1853 














f lO.iSR 


1854 


011610 


032777 


A AAA 4 A 

000010 


167226 


At 1 A A Ik 

OcLAOJ : 


BI T 


1855 
















1856 


011616 


A A 4 t A 4 

001401 








OCA 


1 • 


1857 


011620 


A A A ^ A ^ 

000207 










Z r 


4 B C B 

1858 


A 4 4 ^ ^ ^ 

01 1622 


A 4 ^ 7A4 

012701 


AA 4 AT / 

001034 




If: 




if AA 1 D 1 

f AD J , K 1 


1859 


011626 


A1 ^7AA 

012700 


AA1 AO/ 

00102s 






MAU 


ifl\CI 1 Dfl 


1860 


01 1 632 


012702 


AA<I A7 

001032 






MAU 


f DcL't <Rc 


1861 


A4 4 / 7^ 

01 1636 


AZ I^AI 

062702 


AAAAAO 

000002 








*c>R2 


4 B ^ ^ 

1862 


011642 


Ai ^ 4 ^ A 

012120 






Oft . 
2»: 


MAU 


f B 1 1 & 1 Bn \ A 
IKl J ♦ , IROJ ♦ 


1863 


011644 


A ^ A ^ A A 

020200 








Cnr 


B 0 BA 


1864 


011646 


AA4 7 7C 

001375 








BNc 


o« 

£• 


4 BZ r 

1865 


A4 4 ^ CA 

011650 


AAA^A7 

000207 








n 1 S 


• 7 

• f 


4 B^ £. 

1866 
















1867 


011652 


01 5 f 46 


AAAAAy 

OOOOOh 










1868 
















1869 


A4 4 ^ CZ. 

011656 


Ai ^777 

012737 


■1 ^71 r / 
16rl 54 


AAAAA/ 

OOOOOh 




nOV 


jfCUAn 11 ^ML 


4 a 

1870 


/\ 4 4 Z ^ / 

01 1664 


005777 






T C T 

TST 




4 a ?4 

1871 


/\ 4 4 Z 7 A 


A ^ T7 
01 CbbI 


AAAAA/ 

OOOOOm 






nOV 


t»0 J ♦ 


1872 
















io73 


0116^ A 


AAATA7 
00020f 








AT C 


¥7 


l0'4 
















i O 7C 

lOf J 


All i^7^ 


022o20 








mo 


\ *Q / * , V •0 / * 


lor6 


A1 i 7AA 

01 1 rOO 


Ai 0^ 77 


AAAAA/ 
000004 






MAU 

nOV 


V *0 ^ ♦ , 


1 a77 

1 Of f 


m 1 7nA 

U 1 1 ( Uh 


ni 37T7 


nOAl 7A 






nuw 


jfCAFTSR CR 


1878 
















1879 


011712 


000207 








RTS 


17 


1880 
















1881 
















1882 
















1883 




000001 






.END 
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SEO 0040 



;REST0RE KEYBOARD VECTOR 



TEST FOR SR3=0 WHICH INDICATES 

11/60, 11/70 111/45 WITH MOS 

ADJUST DELAY TIMES 

NO ADJUSTMENTS REQUIRED 

GET START OF REG. FOR ADJUST 

GET START OF REG. TO ADJUST 

GET END TAG OF ADJUSTMENT 

UPDATE END CHECK 

UPDATE DELAY COUNTS 

ARE WE DONE 

NO CONTINUE UPDATE 

ADJUSTMENT MADE 

SAVE CONTENT OF TRAP 
VECTOR 

SET UP NEW TRAP VECTOR 
TEST FOR SUITCN REG. 
RESTORE STACK NO 
TIME our AC CONED. 



UPDATE STACK 
RESTORE TRAP VECTOR 
SET SUITCH RE6.(SR) TO 
EQUAL SOFTSR 
RETURN TO CALLER 





k'LH 1 DT 




Mir vl 1 


30A(1052) 


19-APR 


-7R no- 


C 4 
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CZKUBJ. 


P11 19- 
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CROSS REFERENCE 


TABLE — 


USER SYMBOLS 












SEQ 0041 


ADJ 


001 03<. 


474# 


1838 
























BEGIN 


001150 


452 


500# 


516 


1134 


1212 


1224 


1313 














BEGIN1 


005210 


453 


1143* 


1179 


1196 


12 Of 


1214 
















BEGIN2 


001046 


451 


484« 
























BUFF = 


000776 


449# 


484 


500 


850 


865 


880 


895 


1143 


1217 


1418 


1430 


1442 


1454 






1473 


























BYTl 


006704 


1406# 


1598 


1622 






















BYT2 


006705 


1407# 


























BYT3 


006706 


1408' 


























BYTA 


006707 


1409f 


























BYT5 


006710 


1410f 


























3YT6 


006711 


1411# 


























3YT7 


006712 


1412f 


1617 
























CACL 


004446 


1016 


1027# 


1058 


1083 




















CC 


177776 


445« 


629* 


830* 


853* 


868* 


884* 


1088* 


1104* 


1287* 










CHAR 


006100 


1252* 


1255* 


1263* 


1264* 


1265* 


1274# 


1277 














CKCSR 


010156 


1599# 


1601 


1618 






















CKM 


001006 


463f 


834* 


854* 


869* 


887* 


899* 


948 


952* 


975* 


1145* 


1482* 






CKVS 


CC1010 


464« 


831* 


953* 


1145 


1146* 


1483* 
















CKVSl 


006604 


1372# 


1503* 
























CKVI 


006602 


137U 


1502* 
























CLK 


007672 


1421* 


1433* 


1445* 


1457* 


1537* 


156? 


1569 


1572 


1575 










CLKFLG 


006606 


1373# 


1488* 


1499 


1504* 


1508* 


















CLKI 


010476 


1482 


1697# 
























CLKON 


007434 


1493 


1495# 
























CLtCSER 


004240 


952 


979# 
























CLKXIT 


004244 


981 # 


























CLK1 


007700 


1422* 


1434* 


1446* 


1458* 


1538f 


















CLK2 


010772 


1590 


1746# 
























CLIC3 


010504 


1426* 


1438* 


1450* 


1462* 


1698« 


















CLKA 


010534 


1427* 


1439* 


1451* 


1463* 


1700 


1703# 
















CNGSUR 


010134 


1518 


1591# 
























CNT 


006632 


951* 


972* 


973 


1383* 


1528* 


1546* 


1786* 


1799* 


1819* 


1823* 


1836* 


1840* 




CNTB 


006636 


I385f 


1784* 


1801 


1806* 


1812* 


1816* 


1822* 


1828* 


1830 


1834* 


1839* 


1842* 


1843 


CNT1 


006634 


1384# 


1529* 


1541 


1545* 


1785* 


1803 


180S* 


1818* 


1820* 


1826* 


1837* 






COLON 


011376 


1802 


1812# 
























CR 


0 1 1 266 


1783 


1792# 
























CRLF 


010324 


1597 


1636 


1639* 


1641 




















CSB 


001002 


461f 


536* 


537 


549* 


558* 


568* 


582* 


643* 


651* 


660* 


672* 


685* 


698* 






714* 


731* 


748* 


765* 


780* 


797* 


815* 


833* 


856* 


871* 


886* 


900* 


927* 






954* 


1001* 


1009* 


1043* 


1051* 


1068* 


1076* 


1089* 


1105* 


1150* 


1164* 


1185* 


1198* 






1491* 


1527* 


1537* 






















CSBl 


006574 


1021* 


1368# 


1501* 


1505* 


151?* 


















CSR 


001000 


460# 


521* 


523 


557* 


567* 


571* 


572 


573* 


574 


589* 


590 


593* 


594 






597* 


598 


601* 


602 


607* 


608 


611* 


612 


617* 


618 


621* 


622 


630* 






631 


634* 


635 


641* 


644* 


645 


649* 


652* 


653* 


654 


658* 


661* 


662* 






663 


671* 


674* 


684* 


687* 


697* 


699* 


701 


705* 


713* 


715* 


717 


721* 






730* 


732* 


734 


738* 


747* 


749* 


751 


755* 


764* 


766* 


768 


772* 


779* 






781* 


783 


787* 


796* 


798* 


800 


804* 


814* 


816* 


818 


822* 


832* 


835* 






839* 


842 


849* 


855* 


857* 


861* 


864* 


870* 


872* 


876* 


878* 


885* 


888* 






892* 


894* 


901* 


905* 


911* 


928* 


935* 


955* 


976* 


1000* 


1002* 


1004 


1008* 






1010* 


1012 


1042* 


1044* 


1046 


1050* 


1052* 


1054 


1067* 


1069* 


1071 


1075* 


1077* 






1079 


1087* 


1090* 


1094 


1096* 


1098* 


1099 


1106* 


1110 


1112* 


1115 


1153* 


1162* 






1167* 


1176* 


1187* 


1194* 


1200* 


1207* 


1240 


1490* 


1526* 


1538* 








CSRT 


001312 


520 


527# 
























CSR1 


006576 


1020* 


1022* 


1023 


1369« 


1506* 


1511* 
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MAT Y1 1 


30A(1052) 


19-APR 


-78 09- 

f w w 7 ■ 


58 PAGE 


43 
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CROSS REFERENCE 


TABLE -- 


USER SYMBOLS 












d u w 






46?# 


541* 


542 


550 


562 


577 


584 


675 


688 

Wi w 


707 

f W r 


723 


740 

f tw 


757 






774 


789 

r w 7 


806 


825 


929 


1007 


1015 


1049 


1057 

1 W ^ • 


1074 


1082 

1 wOk 


1242 


1564 


f TRl 1 = 


000? 1 1 


1 3864 


























fTRI T s 


000??4 


1 3874^ 


























CTR1 


006600 


1 370# 

\ J % WIT 


























DEL ADJ 


011610 


490 

■1 7 W 


502 


1854# 






















DFL Y 


004416 


1003 

1 WW^ 


1011 

1 W 1 I 


1020# 


1045 


1053 


1070 


1078 














DELI 

1/1. ^ ■ 


001024 


470# 


700 


767 


836 


858 


873 


889 


902 


1091 


1 107 

1 1 w * 


1859 








001026 


471# 


716 


782 






















DFI ^ 


001030 


472# 


559 


569 


733 


799 


















DFL 4 


001032 


473# 


750 

r ^ W 


817 


1860 




















DOMF 


01 1 360 


1800 


1808# 


























011220 


1752 


1757 


1762 


1767 


1774 


1777 


1780 


1783# 














006366 


1317* 


1 318 


1335# 
























104000 


444# 


525 


539 


544 


552 


564 


579 


586 


592 


596 


600 

W w W 


604 

ww~ 


610 






614 

WIT 


620 

W 


624 


633 


637 


647 


656 


665 

WW^ 


677 

W ■ ' 


690 


706 

■ WW 


709 


722 






725 


739 


742 


756 


759 


773 


776 


788 


791 


805 


808 

WWW 


823 

Wfc J 


827 






840 


845 


848 


862 


879 


893 


906 


933 


966 


1006 


1014 


1017 


1048 






1056 


1059 


1073 


1081 


1084 

1 ww~ 


1097 


1101 


1113 


1117 










HOLD 


007760 


1551* 


1554# 
























HOLDI T 


007750 


1551# 


1557 
























HRS1 


006642 


1389# 


1476* 


1529 


1558 


1730 


1733* 


173^* 














HRS1 A 


006662 

W W W V W b 


1397# 


1559 


1772 


1775* 


1781* 


1785 
















HRS2 


006644 


1390# 


1477* 


1727* 


1728 


1734* 


1736 


1740* 














HRS2A 


006664 

www 


1398' 


1769* 


1770 


1776* 


1778 


1782* 
















H50Z 


007150 


457 


1454f 
























H60Z 


007064 

>/ W 1 W W T 


456 


1442f 
























I COUNT 


001022 


469# 


496* 


514* 


1301 




















INIT 


007250 


1428 


1440 


1452 


1464 


1472# 


















INTFL6 


006610 


1374# 


1489* 


1556* 


1565 


1697* 


















KCSR 


006624 


1380# 


1487* 


1600 






















KOBR 


006622 

W W WW C L 


1379* 


1515 


1536 


1542 


1551 


1602 
















KIN 


007614 

WW • W I T 


1520 


1526f 
























KINI 


007710 


1532 


1541# 
























KINI2 


007660 

WW* WW w 


1535# 


1548 
























KINTR 


007560 

WW' ^ w w 


1484 


1515# 


1535 


1846 




















ICOUT 


007762 


1502 


1522 


1S56f 


1566 




















KVEC 


006626 

W WW wfc W 


1381# 


1484* 


1532* 


1535* 


1548* 


1557* 


1846* 














KVECS 


006630 

w w ww^ w 


1382# 


1485* 
























KlOHZ 


007000 


455 


1430f 
























K100HZ 


006714 


454 


1418# 
























.F 


01liS04 


1792 


1796# 
























JNE 


005570 


1180* 


1183* 


1185 


1198 


12091 


















LCGICA 


005174 


443 


1130# 
























LOOP 


004152 


958# 


974 
























ST 


006656 

w www ^ w 


1395# 


1474* 


1530* 


1698* 


1699 


1701* 
















LSTA 


006676 


1403# 


























NIN1 


006646 

W W W w • w 


1391# 


1478* 


1722* 


1723 


1726* 


















IIINIA 


006666 

WW WW WW 


1399# 


1764* 


1765 


1768* 




















HN2 


006650 

w www ^ w 


1392# 


1479* 


1717* 


1718 


1721* 


















■IIN2A 


006670 


1400# 


1759* 


1760 


1763* 




















■iovE 


007234 


1425 


1437 


1449 


1461 


14661 


















nsGPW 


006A 72 


1221 


1352# 
























fSGI 


006370 


1231 


1337f 
























>ISG2 


006432 


1234 


1344# 
























fSG3 


006436 


487 


1346# 
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CZKWBJ . 
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CROSS REFERENCE 


TABLE -- 


USER SYMBOLS 












MST 


006660 


1396« 


1475* 


1531* 


1702* 


1703* 


1704 


1706* 












MSTA 


006700 


1404# 


1589* 


1746 


1748* 


1818 
















NEWT 


011174 


1771 


1778# 






















NEUTH 


010744 


1729 


1736# 






















NOP = 


000240 


446# 
























Num 


011516 


1829 


1833* 
























011600 


1833 


1846# 






















OCT 


006076 


1259* 


1269* 


1273* 




















ncTP 


006102 


1256 


1267 


1275# 




















OCTPRT 


005766 


1239 


1241 


1243 


1245 


1252« 
















0CT1 


006006 


1254 


1256/V 






















0CT2 


006024 


1260f 


1270 






















PCSR 


006614 


1376# 


1605 


1640 


1644 


1788* 
















PD6R 


006612 


1375# 


1607* 


1642* 


1646* 


1787* 


1793* 


1797* 


1804* 


1809* 


1813* 


1830* 


1843* 


PER 


011414 


1808 


1816# 






















PINTR 


011322 


1796 


1799* 






















PRINT 


005650 


438 


1228# 






















PRINT1 


005764 


509* 


1232 


1236* 


1250* 


















PSU 


006640 


504* 


949* 


959* 


961* 


1388# 


1420* 


1432* 


1444* 


1456* 








PVEC 


006616 


1377# 


1783* 


1792* 


1796* 


1808* 


1829* 


1833* 












PVECS 


006620 


1378# 


1486* 






















PURDUN 


005610 


1213 


1215* 






















PURF1 


005572 


503 


1212# 


1472 




















PV'RF2 


005602 


1147 


1214# 






















PWRRTN 


005646 


1212* 


1214* 


1223 


1224# 


















PURUP 


005620 


1215 


1217* 






















RETURN 


006264 


508* 


1288 


1306* 


13131 


















SCOPE = 


104400 


447# 


535 


548 


556 


566 


581 


588 


606 


616 


628 


640 


648 






670 


683 


696 


712 


727 


744 


763 


778 


793 


811 


829 


852 






883 


897 


922 


947 


996 


1041 


1064 


1086 


1103 


1118 






SCOPEB 


006136 


1286# 


1292 


1304 


1312 


















SCOPEC 


006150 


440 


1291# 






















SCQPEF 


006250 


506* 


1301 


1303* 


1305* 


13081 
















SCOPEG 


006236 


1300 


1302 


1305# 




















SEC1 


006652 


13931 


1480* 


1712* 


1713 


1716* 
















SEC1A 


006672 


1401# 


1754* 


1755 


1758* 


















SEC2 


006654 


1394# 


U81* 


1707* 


1708 


1711* 
















SEC2A 


006674 


1402« 


1749* 


1750 


1755* 


















SETBYT 


010140 


1594f 


1609 






















SOFTSR= 


0001 76 


448# 


1877 






















SP3 


006120 


1271 


1280# 






















SP3A 


006132 


1280 


1283# 






















SR 


001044 


479# 


529 


745 


812 


924 


997 


1181 


1195 


1228 


1246 


1291 


1299 






1495 


1497 


1509 


1652* 


1854 


1870 


1877* 












START 


007412 


1490# 
























SWADJ 


011652 


489 


501 


1144 


1419 


1431 


1443 


1455 


18671 










SUADJ1 


011676 


1869 


1875# 






















SWDONE 


010246 


1611 


1613 


1619* 




















TABL 


010356 


1423 


1435 


1447 


1459 


1580 


16491 














TABL1 


010376 


1424 


1658# 






















TABL2 


010416 


1436 


1667f 






















TABL 3 


010436 


1448 


1676* 






















TABLA 


010456 


1460 


1685f 






















rcsR 


001014 


466f 


986 


1122 


1125 


1157 


1171 


1189 


1202 


1275 


1316* 


1323 


1327 


TDBR 


001012 


465# 


988* 


1121* 


1124* 


1159* 


1173* 


1191* 


1204* 


1277* 


1325* 


1329* 


1332* 


TE«P 


001020 


468# 


505* 


540* 


542 


547* 


549 


550 


553* 


559* 


560* 


569* 


575* 



SEO 0043 



657 
867 



1492 



1330 
642* 



CZKUBJO KWll-P RT CLK TST 
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CZKUBJ 


.P11 19-APR-78 


09:55 




CROSS 






643 


650* 


651 






700* 


703* 


716* 






802* 


817* 


820* 






890* 


902* 


903* 






1244 






TEHP1 


001016 


467# 


507* 


898* 


TUTIK 


00A2A6 


950* 


962 


964 


THPSUR 


006702 


1405« 


1595* 


1624* 


TOP 


U06266 


488 


498 


1222 


TOPI 


0063C0 


1318# 


1326 


1334 


T0P2 


006332 


1322 


1327* 




TRPA 


00520A 


1128 


1134* 




TSTEND 


0051 5A 


1121# 






TYPE 


00A250 


960 


963 


986* 


TO 


001 25A 


508 


510 


519* 


T1 


001 33A 


524 


526 


534* 


T10 


002226 


670» 






T10A 


002250 


674# 


680 




Til 


002304 


683» 






T11A 


00232A 


687# 


693 




T12 


002360 


696« 






T12A 


002A10 


701« 


704 




T12B 


002436 


702 


707* 




T13 


0024A6 


712# 






T13A 


002476 


717* 


720 




T13B 


002524 


718 


723* 




TU 


002534 


727» 






TUA 


002572 


734# 


737 




TUB 


002620 


735 


740* 




T15 


002630 


729 


744* 




T15A 


002670 


751# 


754 




T15B 


002716 


752 


757* 




T16 


002726 


746 


763* 




T16A 


002756 


768# 


771 




T16B 


003004 


769 


774* 




T17 


003014 


778# 






T17A 


003044 


783* 


786 




T17B 


003072 


784 


789* 




T18 


003102 


793# 






nSA 


003140 


600* 


803 




T18B 


003166 


801 


806* 




T19 


003176 


795 


811* 




11 9A 


003236 


81 8# 


821 




T19B 


003266 


819 


825* 




T20 


003276 


813 


829* 




T20A 


003366 


834 


842* 




T21 


003426 


841 


852* 




T21A 


003512 


854 


864* 




122 


003522 


863 


867* 






003602 


869 


878* 




T23 


003616 


877 


883* 




T23A 


003702 


887 


894* 




T23AA 


003662 


890f 


891 




T24 


003712 


6970 






T2AA 


003744 


9020 


910 




T24B 


003774 


899 


908* 





F 

09:58 



4 

PAGE 



45 



REFERENCE TABLE — USER SYKBOLS 



SEQ 0044 



659* 


660 


673* 


675 


678* 


679 

\i f f 


686* 

V w U 






Of c 


719* 


733* 


736* 


750* 


753* 


767* 


770* 


782* 


785* 


799* 


836* 


837* 


842* 


843 


846 


858* 


859* 


873* 


874* 


889* 


932* 


1007* 


1027 


1035* 


1049* 


1074* 


1091* 


1092* 


1107* 


1108* 


909* 


1015* 


1028 


1057* 


1082* 












980* 


984* 


















1627* 


1628* 


1629* 


1632 














1235 


1281 


1316* 
















987 




















530 


532 



















CZKUBJO 


KU11-P RT CLK 


TST 


HACni 


C2ICUBJ. 


P11 19-APR- 


78 09:55 




T24C 


004010 


907 


922» 


T2AD 


004076 


934 


94 7# 


T25 


004264 


926 


977 


T25A 


004502 


1018 


1041# 


T26 


004616 


1064« 




T27 


004740 


999 


1066 


T27A 


005040 


1103# 




T28 


005256 


1152/r 


1161 


T28A 


005270 


1154# 


1156 


T29 


005336 


1166# 


1175 


T29A 


005350 


1168« 


1170 


T3 


001414 


549# 


554 


T3A 


001442 


556# 




T3B 


001504 


566# 




T30 


005456 


1188» 


1193 


T31 


005536 


1201# 


1206 


T4 


001572 


581# 




T5 


001614 


588# 




T6 


001712 


6Q6M 




17 


001750 


61 6« 




T9 


002006 


628f 




T9A 


002052 


640# 




UAITA 


007422 


1492# 


1500 


WAITS 


00 -'432 


1494# 


1507 


XOR 


001230 


492 


512# 


XORA 


006254 


1296 


1310# 


XORFLG 


0062S2 


495* 


515* 


XORn 


006540 


497 


1360# 


= 


011714 


435# 


437# 






599 


603 






708 


724 






1109 


1116 






1276 


1319 






1724 


1731 



ABS. 011714 



ERRORS DETECTED: 



000 



G 4 

50A(1052) 19-APR-78 09:58 PAGE 46 
CROSS REFERENCE TABLE — USER SVHB".S 



996# 
1086/r 



SEQ 0045 



1513 



728 


794 


1065 


1178 


1293 


1309# 












U2« 


4S0f 


4S9# 


$38 


5*3 


551 


S63 


578 


585 


591 


595 


609 


613 


619 


623 


632 


636 


646 


655 


664 


676 


689 


741 


758 


775 


790 


807 


826 


844 


847 


904 


1093 


1100 


1123 


1126 


1158 


1172 


1182 


1190 


1203 


1220 


1229 


1233 


1247 


1324 


1328 


1331 


1336f 


1343# 


1345# 


1359# 


U13# 


1709 


17U 


1719 


1737 


1751 


1756 


1761 


1766 


1773 


1779 











C2IC«BJ.BIN,C2KUBJ.LST/CRF/S0L/NL:T0C=C2KU8J.P11 
RUN-TIHE: 2 4 .5 SECONDS 
RUN-TIHE RATIO: 41/7=5.7 
CORE USED: 9K (17 PAGES) 



